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CROSS-REFERENCE TO RELATED APPLICATIONS 

The present application derives priority from U.S. Provisional Patent Application No. 
60/161,239 for "PRINTER MANAGEMENT PROTOCOL"; Filed: October 22, 1999. 

BACKGROUND OF THE INVENTION 

1 . Field of the invention 

The present invention relates to a printer management protocol for network printers and, 
more particularly, to a to a printer management protocol to assign and manage local and network 
printers in a networked computer environment. 

2. Description of the Background 

A primary goal of local area network (LAN) technology is to share all resources that are 
distributed across the network. Existing network software helps network administrators to 
accomplish this purpose. For example, Microsoft® Windows NT® Server 4.0 allows 
administrators to give anyone in their organization access to resources available on a Windows 
NT Server system, regardless of the client operating system they are using and without changing 
client software. Thus, no matter what operating system clients are equipped with, they can all 
connect to Windows NT Server using the protocols that they support natively. Consequently, 
most network resources can be managed from one location (centralized management). Resources 
like drive shares, SQL servers, mail servers, routers, etc. can be managed from remote locations. 
There is one resource that remains very difficult to manage. Specifically, printer management in 
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networks is still an elusive goal. This is primarily due to the complexities in managing the 
diverse operating systems of the client computers, and the numerous printer drivers required for 
each different type of printer and for each different operating system. Printers that are attached 
to the user's computer are not easily installed, configured or removed. In order to install and use 
5 a new printer on a user's computer, the device driver must be installed from the computer itself, 
the port must be configured and the device mode settings (things like page size) must be 
manually set. 

;i As an example, FIG. 1 is a local area network diagram that helps to illustrate the obstacles 

* 3 faced in central printer management. Within the LAN a plurality of clients, e.g., 20-1-1 ..20-m-n 
10? U are connected to respective network Servers 30-1 ...m via any of a number of different 

communication topologies inclusive of 10-base T, 100-base T, Sonet, Token Ring, etc. Clients 
JZ 20-1 ..20-n might be configured to communicate with Server 30 via any of a number of different 
s t t communication protocols such as IPX/SPX, TCP/IP, etc. In addition, Clients 20-1-1. .20-m-n 
13 might be running any of various operating systems such as Macintosh, Windows 95, 98 or 
15 Windows NT Workstation. Moreover, any number of different printers 40-1 -1 ...40-nvn may be 
connected to the LAN, each requiring a different printer driver specially configured depending on 
the above constraints. If there are 100 client stations 20-1 -20.. 20-5-20 each with printers 
attached, and there are 5 servers 30-1. .5, then there would need to be 500 printer configurations 
defined and maintained. The management of client printer configurations has traditionally been a 
2 0 manual process and all printer drivers must be manually installed and network connections 

manually established. This is accomplished by the administrator physically working with each 
client station connected to the LAN, and the impracticality of the situation becomes apparent. 
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It would be greatly advantageous to provide a method for dynamically centrally 
configuring and managing a user's printer environment based on group membership, user name, 
terminal name or computer name. 

5 SUMMARY OF THE INVENTION 

In accordance with the above, it is an object of the present invention to provide a Printer 
Management Protocol (PMP) to dynamically centrally configure and manage a user's printer 
3 environment based on group membership, user name, terminal name or computer name. 
\3 In accordance with the above, it is an object of the present invention to provide a robust network 
10 fU printer management protocol that incorporates a single user interface for the assignment and 
management of printers and printer connections for users on a computer network. 

It is another object to allow administrators to install and configure printers easily by 
} i maintaining a library of print drivers on a centralized server, or a synchronized farm of servers, 
f 3 for automatic real-time client printer driver installation and configuration regardless of operating 
15 system. 

It is a further object to allow the installation and configuration of printers and printer 
connections from a remote / centralized location. 

It is a further object to allow the simplified management of user's printers on a multi user 
computer system such as Microsoft Windows NT Terminal Server Edition, with or without Citrix 
2 0 MetaFrame installed. 

In accordance with the above described objects, the present invention provides a system 
and method for assigning and managing the configuration of user's printers based on group 
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membership, user name, terminal name (client name) and computer name. The method can be 
implemented in any computer network and generally comprises the following steps: 

1 . Define a user's group membership, user name, terminal name and computer name. These 
definitions are known as "Owners", e.g., the combination of groups that a user belongs to 
as defined by group memberships, user name, terminal name (client name) and the 
computer name. 

^ 2. Query a database to determine which printers are to be assigned to the user. 

3 3, Recursively execute a routine to configure local printers (connected to the user's 

U computer or terminal), automatically install the required driver software and set the 

l t permissions of the printer, so only the targeted user's can access the printers. 

Z 4. Recursively execute a routine to connect to any assigned network printers (not directly 

l connected to the use 

3 5. Automatically set the default printer for the user. 

6. Clean up all created printers and printer connections when the user logs off This prevents 
the accumulation of unwanted/unneeded printers or printer connections. 

BRIEF DESCRIPTION OF THE DRAWINGS 

Other objects, features, and advantages of the present invention will become more apparent 
from the following detailed description of the preferred embodiment and certain modifications 
thereof when taken together with the accompanying drawings in which: 
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F1G. 1 is a perspective block diagram of an exemplary local area network (LAN) 
incorporating the printer management program (PMP) according to the present invention, 

FIG. 2 is a top-level flow diagram of the PMP Client according to the present invention. 
FIG. 3 is a detailed flow diagram of the Add Local Printers step 130 of Fig. 3 that displays 
the method for reading a database and adding local printers (printers directly connected to a user's 
computer or terminal). 

FIG. 4 is a detailed flow diagram of the Add Network Printers step 140 of Fig. 3 that 
S displays the method for reading a database and connecting to network printers (printers not 
3 directly connected to the user's computer or terminal). 

U FIG. 5 is a more detailed flow diagram of the Create Local Printer step 250 of Fig. 4 that 

; 1 shows the method for creating a local printer. 

* FIGs. 6.1-60 is a listing of an exemplary source code implementation of the printer 

5 management protocol of the present invention, inclusive of steps 1 10-470 (demarcated with step 

3 numbers indicated), written using Borlund® C++ Builder version 5.0. 

DETAILED DESCRIPTION OF THE PREFERRED EMBODIMENT 

The present invention is a printer management protocol (PMP), or method, for 
automatically and centrally managing the printer environment for users on a computer network. 

FIG. 1 is a perspective block diagram of an exemplary LAN capable of benefitting from 
the printer management protocol (PMP) according to the present invention. Within the LAN, each 
cluster of client stations, e.g., 20-1-1 ..20-1-n is connected to a network Server 30-1 via any of a 
number of conventional communication topologies inclusive of 10-base T, 100-base T, token ring. 
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etc. The Servers 30-1 ..m may be interconnected via an existing backbone in a distributed 
network. As previously described, a first cluster of Clients 20-1..20-n might be configured to 
communicate with their assigned Server 30-1 via any of a number of different communication 
protocols such as IPX/SPX, TCP/IP, etc. Clients 20-1..20-n might be running any of a number of 
different operating systems. In addition, any number of different printers 40-1-1 ...40-m-n may be 
connected to the LAN, each requiring a different printer driver specially configured depending on 
the above constraints. One or more printers may be locally attached to each client station (here 
3 printer 40-1-1 is local to client 20-1-1), and other printers may be connected elsewhere within the 
cluster or in other clusters and are remote. Thus, if the network administrator is using Client 
station 20-1-1, there is one local printer 40-1-1 attached as well as numerous other remote printers 
both in and out of the immediate cluster. Previously, there was no satisfactory solution for 
Z centralized printer management. All terminal printer connections needed to be manually 
5 configured on each Server 30-1 ...n in each cluster, and this led to hundreds and even thousands of 
i printer configurations that had to be defined and maintained. The printer management protocol 
(PMP) according to the present invention automatically and centrally manages the configuration of 
the network printers based on group (cluster) membership, user name and client name (computer 
name). 

The PMP protocol according to the present invention includes server software for 
centralized administration (herein called PMP Centralized Administration), and implementing 
client software called PMP Client, both of which are herein described. Both software packages 
can be developed for Windows operating systems. The Microsoft® Win32® application 
programming interface (API) allows applications to exploit the power of the 32-bit Windows 
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family of operating systems. Using the Win32 API, it is possible to develop applications that run 
successfully on all 32-bit versions of Windows. The Microsoft® Windows® graphics device 
interface (GDI) is the portion of the Win32® API that enables applications to use graphics and 
formatted text on the printer. Win32-based applications do not access the graphics hardware 
5 directly. Instead, GDI interacts with device drivers on behalf of applications. The GDI can be 
used in all Windows-based applications, and the Win32 API was designed for use by C/C++ 
programmers. Thus, both PMP Centralized Administration and PMP Client can be rendered in 

1% C/C++ programming language, and calls to the Windows API can be made directly from the 

y respective programs. Microsoft® Windows® and Microsoft Windows NT®®/Windows 2000 
lOf y provide a complete set of functions that allow applications to print on a variety of devices: laser 

^ i printers, vector plotters, raster printers, and fax machines. The hundreds of Windows API 

!Z functions and related structures are well-documented. 

O 1 • PMP Centralized Administration Server Software 

15 The ability to centrally manage local and network printer assignment to computer users as 

well as provide the ability to dynamically install the required driver files requires the 
establishment of certain information constructs to facilitate the information flow needed by the 
PMP Client program to operate. First, a PMP database must be constructed to store information 
on ail Owners, Local Printers, Network Printers, Assigned Local Printers, and Assigned Network 

2 0 Printers, and the PMP administration program must be capable of saving information to it. 

Second, a storage location must be established for the printer driver configuration files, and the 



Application of Ha limey er 
Page -9- 



PMF Centralized Administration Server Software must be capable of saving printer device 
settings to the printer driver configuration files. 



A. PMP Database Design 

The PMP data structure should consist of five tables; Owners, Local Printers, 
NetworkPrinters, AssignedLocalPrinters, AssignedNetworkPrinters. The following is an example 
of a suitable layout of the five tables with descriptions of the purpose for the defined fields: 



Owners 



Field Name 


Type 


Size 


Key 


Description 


ID 


-h 




* 


The unique identifier for the record. 


Name 


A 


255 




The name of the Owner. An Owner can be 
a local group, global group, user, client 
name or computer. 


Ordinal 


I 






The number which specifies the order that 
the object should be placed. All queries 
are ordered by Ordinal. 


TypeOfOwner 


A 


1 




The type of Owner. L = local group, G = 
global group, U = user, T = terminal. 



LocalPrinters 



Field Name 


Type 


Siz 

e 


Key 


Description 


ID 


+ 






The unique identifier for the record. 


Name 


A 


255 




The name of the local printer. This name will 
be prefixed with <CLIENTNAME># or 
<USERNAME># if not running on Microsoft 
Windows NT Terminal Server Edition. 


FileName 


A 


255 




The name of the printer configuration file 
which stores the printer information. 
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Monitor 


A 


255 




The printer port monitor name (Client Printer 
Port, Local Port, etc.). 


Port 


A 


255 




The name of the port (like "CLIENT\LPT!:", 
or 10.10.10.10::10.10,10.10) 


SourceServer 


A 


255 




The server that has the driver installed. PMP 
Client will automatically copy the driver files 
from this server if they do not exist on the 
client. 


Disabled 


L 






True if this printer is disabled and should not 
be created. 



5 

NetworkPrinters 



Field Name 


Type 


Siz 
e 


Key 


Description 


ID 


+ 




* 


The unique identifier for the record. 


Name 


A 


255 




The UNC path for the printer (\\server\share). 


Disabled 


L 






True if this printer is disabled and should not 
be connected to. 



AssignedLocalPrinters 



Field Name 


Type 


Siz 
e 


Key 


Description 


ID 


+ 






The unique identifier for the record. 


OwnerlD 


I 






The ID of the Owner table record to which the 
Printer is assigned. 


LocalPrinterlD 


I 






The ID of the LocalPrinters table record to 
which the Owner is assigned. 


Map 


A 


255 




Reserved. 


IsDefault 


L 






True if this printer is to be the default for the 
user. 


Ordinal 


I 






The number which specifies the order that the 
object should be placed. All queries are 
ordered by Ordinal. 



25 
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AssignedNetworkPrinters 



Field Name 


Type 


Siz 

e 


Key 


Description 


ID 


+ 




* 


The unique identifier for the record. 


OwnerlD 


i 






The ID of the Owner table record to which the 
printer is assigned. 


NetworkPrinterlD 


i 






The ID of the NetworkPrinters table record to 
which the Owner is assigned. 


Map 


A 


255 




Reserved. 


IsDefault 


L 






True if this printer is to be the default for the 
user. 


Ordinal 


I 






The number which specifies the order that the 
object should be placed. All queries are 
ordered by Ordinal 



10 1 j 

IE Again, the PMP Centralized Administration Server Software must be capable of storing 

3 the required information as specified in the above-described PMP Database Design tables. 



It B. Storage Location 

is" In addition to the PMP Database, a storage location must be established for the 

printer driver configuration files. The storage location can be either centralized (stored on a UNC 
path) or distributed and synchronized (stored on each computer's local drive). The PMP 
administration program must be capable of saving printer device settings to a particular printer 
configuration file. The present invention accomplishes this using a developed 

2 0 TprinterControl : :SaveLocalPrinter( ) function. 
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2. PMP Client 

The compiled program that implements the present invention is the PMP Client. Under 
Windows NT, the PMP Client runs for each user in user mode. It could also be written to run as a 
service in system mode. 

5 FIG. 2 is a top-level flow diagram of the PMP Client Software method according to the 

present invention. 

At Step 100, the user logs on and PMP Client Software is launched from the Userlnit 
3 string. Userlnit is a system program that starts all programs listed in the Userlnit string at logon 
-*-3 and initializes variables. The implementing source code for step 100 can be found at FIG. 6.2. 
10-^ Step 110 introduces a delay during which the program sleeps for a predetermined number 

1 of seconds (StartupDelay). The implementing source code for step 1 1 0 can be found at FIG. 6.9. 
O In many cases, users will manually connect to network printers during their session. This can 
1 3 cause problems if the user is not familiar with the naming schemes involved in connecting to 
CI network printers. The PMP Centralized Administration Server Software allows the administrator 
15 to set a flag in the PMP Client Software to force the clearing of all network printers at logon. If 
this flag is set, Step 120 clears the network printer connections stored in the user profile. The 
implementing source code for step 120 can be found beginning at FIG. 6.10. 

Program flow proceeds to Step 130 where local printers are added, and FIG. 3 illustrates a 
detailed Add Local Printers flow chart representative of this step. The implementing source code 
2 0 for step 1 30 can be found beginning at FIG. 6.3. 
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Beginning at Step 200, the program builds the select statement used to query the database 
for the assigned local printers. The implementing source code for step 200 can be found at FIG. 
6.4. The select statement is the primary query command for Structured Query Language (also 
known as SQL). "Owners" are a combination of groups that a user belongs to, the user name, the 
5 terminal name (client name) and the computer name. Owners are assigned printers or printer 

connections in the PMP Centralized Administration program and these assignments are stored in 
the AssignedLocalPrinters table of the PMP Database described above. 
m Step 210 adds the Owners that the user belongs to, to the SQL select statement as shown. 

\3 The implementing source code for step 210 can be found at FIG. 6.4. 
10 fU Step 220 runs the query defined by the SQL select statement. The implementing source 

^ 1 code for step 220 can be found at FIG. 6.4. 

IZ If there are no records returned, the Add Local Printers Step 130 is complete. Otherwise, 

#3 for each record returned, the following steps are repeated. 

p Step 230 moves the database pointer to the next printer to be added. The implementing 

15 source code for step 230 can be found at FIG. 6.4. 

Step 240 creates a new TPrinterControl object that encapsulates the printer creation. The 
implementing source code for step 240 can be found at FIG. 6.4. 

Step 250 takes us to the Create Local Printer step, and FIG. 4 illustrates a detailed Create 
Local Printer flow chart representative of this step. The implementing source code for step 250 
2 0 can be found beginning at FIG. 6.4. 

With reference to FIG. 4, the creation of local printers is based on storing the printer 
information in a group of files called Printer Configurations. 
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Step 400 reads the printer configuration stored for the selected printer and populates the 
SelectedPrinterlnfo structure (see TPrinterControl::SelectedPrinterInfo for details). The 
implementing source code for step 400 can be found at FIG. 638. 

Step 410 sets the new printer name. The implementing source code for step 410 can be 
found at FIG. 638. If the printer already exists. Create Local Printer exits. A printer port monitor 
is the driver that controls the particular port that will be used to connect to the printer. Example: If 
the port is an LPT port, then the port monitor is a "Local Port 11 . Step 420 validates the port 
n monitor. The implementing source code for step 420 can be found at FIG. 638. 
3 Step 430 validates the port, creating it if it does not exist. The implementing source code 

: J for step 430 can be found at FIG. 639. Step 440 validates the printer driver. The implementing 
: 1 source code for step 440 can be found at FIG. 639. If the print driver does not exist on the client 
Z z computer, then PMP will install the driver automatically. Step 450 adds the new local printer. The 
3 implementing source code for step 450 can be found beginning at FIG. 639. Preferably, the new 
3 printer name is prefixed with either <CLIENTNAME># or <USERNAME># to maintain 

compatability with Citrix MetaFrame for Microsoft Windows NT Terminal Server Edition. The 
CLIENTNAME variable is defined as the name of the terminal connected to the Windows NT 
Terminal Server Edition and can be found by typing "SET" at the command prompt of the user. 

Step 460 restores the printer settings saved in the assigned printer configuration file. The 
implementing source code for step 460 can be found beginning at FIG. 639. 

Step 470 sets the permissions on the printer, so only the SYSTEM and the user have access 
to the printer, thus restricting the printer from unauthorized users. The implementing source code 
for step 470 can be found beginning at FIG. 6.40. 
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At this point, the creation of the new local printer is complete. 

Returning back to the Add Local Printers routine of FIG. 3, if the printer has been flagged 
by the administrator (In the database) as the default printer, and a default printer has not yet been 
set, the method proceeds to Step 260. 

Step 260 sets the printer as the default. The implementing source code for step 260 can be 
found at FIG. 6.5. Step 270 displays any error messages generated by Step 250. The 
implementing source code for step 270 can be found at FIG. 6.5. 

Referring back to FIG. 2, once all local printer records have been processed, the Add Local 
3 Printers Step 130 is complete. After the local printers are added, program flow proceeds to Step 
y 1 40, the Add Network Printers step. FIG, 5 illustrates a detailed Add Network Printers flow chart 
representative of this step. 

Referring to FIG. 5, Step 300 builds the SQL select statement used to query the database 

2 for the assigned network printers. The implementing source code for step 300 can be found 

3 beginning at FIG. 6.6. 

Step 310 adds the Owners that the user belongs to, to the SQL select statement. The 
implementing source code for step 310 can be found at FIG. 6.6. 

Step 320 runs the query. The implementing source code for step 320 can be found at FIG. 

6.6. 

For each record returned, Step 330 moves the database pointer to the next printer to be 
added. The implementing source code for step 330 can be found at FIG. 6.6. 

Step 340 adds the network printer connection using the AddPrinterConnection API call. 
The implementing source code for step 340 can be found at FIG. 6.6. If the printer has been 
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flagged by the administrator as the default printer, and a default printer has not yet been set, 
program flow proceeds to Step 350. 

Step 350 sets the printer as the default, and the implementing source code for step 350 can 
be found beginning at FIG. 6.6. 
5 Step 360 displays any error messages generated. Add Network Printers is complete. The 

implementing source code for step 360 can be found beginning at FIG. 6.7. 

Referring back to FIG. 2, once all printers have been created and connected, program flow 
3 proceeds to step 150 and the PMP Client Software will wait for the WM ENDSESSION message 
\l to be broadcast. The implementing source code for step 150 can be found beginning at FIG. 6.12. 
10 f LI Once the WM_ENDSESSION message has been received, Step 160 removes the printers 

41 1 and printer connections made by PMP Client, The implementing source code for step 160 can be 
« found beginning at FIG. 6.9. 

f 5 Step 170 is the logoff of the user and closing of PMP Client Software. The implementing 

|i source code for step 170 can be found beginning at FIG. 6.2. 
15 The above-described client and server software components and the methods reflected 

therein make it possible to map printers back to the client stations 20-l~L..n. By assigning 
printers 40-1-1. ..n to the ClientName (terminal name), the PMP is able to automatically create the 
printer queues as the users logon from those client stations. Printers are also created additively 
based on Windows NT group membership. So, if a particular group such as the accounting 
2 0 department has a printer that has specific settings, the PMP can configure all authorized user 
connections to this printer simply by assigning the printer to the accounting group with all the 
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correct properties, and then assigning the appropriate users to the accounting group. Printers can 
also be denied to groups of users, users and clientnames (computer names). 

The method is ideal for shared printing in mixed-LAN environments, and stands as a 
solution for all major network operating systems for Ethernet. 100Base-T, 100VG AnyLAN, 
5 Token Ring, and LocalTalk networks. It facilitates easy installation and configuration of virtually 
any printer for direct LAN connectivity. The entire process is automated, and all printer 
management protocol and printer configuration problems are solved. It is simple for LAN 
Q administrators to remotely configure and manage all printers. There is automatic driver 
H installation and printer configuration, and remote configuration is shown graphically on the 
10" 2 administrator PC screen. The protocol greatly simplifies printer management over PC print 
3 " servers, file server connections and PC parallel-port connected printers, inclusive of high-speed 
f J IEEE 1 284 compliant parallel ports on external print servers. 

« Having now fully set forth the preferred embodiments and certain modifications of the 

concept underlying the present invention, various other embodiments as well as certain variations 
15 and modifications of the embodiments herein shown and described will obviously occur to those 
skilled in the art upon becoming familiar with said underlying concept. It is to be understood, 
therefore, that the invention may be practiced otherwise than as specifically set forth in the 
appended claims. 
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I claim: 

1 . A method for managing printers in a network environment, comprising: 

defining all groups that a new user belongs to, as well as a user name, client name, and 
station name when said new user logs onto a client station in the network; 

5 querying a printer database to establish all printers that the designated groups, user, client 

and station have been assigned; 

C3 executing a configuration routine for each assigned printer identified in said query step, 

^1 said routine comprising the following steps, 

f y checking whether a printer driver is installed for each authorized printer and, if not, 

1 0 n installing the printer driver, 

12 automatically configuring each assigned printer identified in said surveying step, 

^ whereby said recursive configuration routine is executed for each assigned printer 

M identified in said surveying step until all such assigned printers are fully configured. 

15 2. The method for managing printers in a network environment according to claim 1, 

wherein said step of executing a configuration routine for each assigned printer identified in said 
query step further comprises executing a routine to configure local printers connected to the user's 
computer, whereby all required driver software is automatically installed and the permissions of 
the local printer are set so that only authorized users can access the local printer. 



20 
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3. The method for managing printers in a network environment according to claim 2, 
wherein said step of executing a configuration routine for each assigned printer identified in said 
query step further comprises executing a routine to configure network printers connected to the 
user's network, whereby all required driver software is automatically installed and the permissions 
5 of the network printers are set so that only authorized users can access the network printers. 

„ 4. The method for managing printers in a network environment according to claim 1 , 

m wherein said step of executing a configuration routine for each assigned printer identified in said 
4 j query step further comprises automatically setting a default printer for the user. 

H 5. The method for managing printers in a network environment according to claim 1 ? 

I ; further comprising a step of cleaning up all created printers and printer connections when a user 
it logs off, thereby preventing accumulation of unwanted and unneeded printers and printer 
connections. 
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ABSTRACT OF THE DISCLOSURE 

A protocol or method, for managing the printers and printer connections for users on a 
computer network based on the user's group membership, user name, terminal name (client name) 
and computer name. 

Network administrators can centrally manage the assignment of user's printers and 
network printer connections on any networked computer system, including Microsoft Windows 
NT Terminal Server Edition. Installation of required drivers is dynamic with no interaction with 
the user. 
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Implementation CODE 

MainUnit.h 

// - 

#ifndef MainUnitH 
#define MainUnitH 

//—- — - - 

#include <CIasses.hpp> 
#include <Controls.hpp> 
#include <-StdCtrls.hpp> 
#include <Forms.hpp> 
#include <Dbtables.hpp> 
//include <Networklnfo.h> 
#include <ShellApi.h> 
#include <ExtCtrls.hpp> 
//include <TriceratMessaging.h> 
#include <DirTools,h> 

// — 

class TMainForm : public TForm 

{ 

^published: // IDE-managed Components 
3 TNetworklnfo *F"NetworkInfo; 
_n TButton *CloseBtn; 

TTitner *IcaPrinterSecurity; 
^ TTimer * Initialize; 

?t void _fastcail CloseBtnClick(TObject ^Sender); 

fi void fastcail FormCreate(TObject *Sender); 

Z void fastcail FormShow(TObject *Sender); 

Z void fastcail Initial izeTimer(TObject *Sender); 

: " void fastcail FormHide(TObject *Sender); 

void fastcail FormActivate(TObject *Sender); 

;f void fastcail IcaPrinterSecurityTimer(TObject ^Sender); 

^ void fastcail FormCIose(TObject *Sender, TCIoseAction &Action); 

private: // User declarations 
»3 AnsiString PrinterlnfoPath; 
12 TStringList *LocaIPrinters; 

TStringList *NetworkPrinters; 

bool bClearNetworkPrinters; 

bool bSetlcaPrinterRights; 

bool DefaultPrinterSet; 

bool Initializing; 

int IcaPrinterRightsDeiay; 

int StartupDelay; 

void fastcail AddOwners(TStrings* sql); 

void fastcail AddLocalPrinters(); 

void _fastcal1 AddMetworkPrinters(); 
void OnDesktopInit(TlVIessage Message); 
void ClearNetworkPrintersQ; 
void CleanUp(); 

void OnQueryEndSession(TMessage Message); 
void OnEndSession(TMessage Message); 
bool GetPrinterRights(TStrmgList * Users); 
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public: // User declarations 

fastcall TMainForm(TComponent* Owner); 

fastcall ~TMainForm(); 

int ProductID; 
AnsiString LogFile; 
TDirTooIs *DirTools; 

protected: 

BEOIN_MESSAGE_MAP 
VCL_MESSAGE_HANDLER(TM_D2K_INIT S TMessage, OnDesktopInit) 
VCL MESSAGE HANDLER(WM_ENDSESSION, TMessage, OnEndSession) 
EMD_MESSAGE_MAP(TForm) 

}; 

//— ----- 

extern PACKAGE TMainForm *MainForm; 

// - 

#endif 



MainUnitCpp 
#inciude <vc!.h> 
#pragma hdrstop 
.J/—-- 

-^include "MainUnit.h" 
}^tfinclude ,r NetworkInfo.h" 
j^include <PrinterControLh> 

I Utfinclude <RegTools.h> 

-JZjj 



|:£#pragma package(smartjnit) 
£j#pragma link lf NetworkInfo" 
f jjftpragma resource "*.dfm" 
1% - 



"TMainForm *MainForm; 

// 



STEP 100 

fastcall TMainForrn::TMainForm(TComponent* Owner) 

: TForm(Owner) 

{ 

Session-> Active - false; 
Local Printers = new TStringList; 
NetworkPrinters = new TStringList; 
DefaultPrinterSet = false; 
Initializing = false; 

f 

// 

STEP 170 

fastcall TMai n Form ::-TMain Form () 

{ 
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delete LocalPrinters; 
delete NetworkPrinters; 

DirTooIs->WriteLog(LogFile. "Terminating PMP Client"); 
delete DirTools; 



//• 



void fastcall TMainForm::AddOwners(TStrings* sql) 

{ 

AnsiString ClientName; 
AnsiString ComputerName; 
ClientName - getenv("CLIENTNAME"); 
if (!ClientName.IsEmpty()) 

ClientName = ClientName.UpperCase(); 
ComputerName - getenv( n COMPUTERNAME"); 

FNetworkinfo->Clear(); 

sq]->Add(" IN (SELECT ID FROM Owners WHERE Name - + 
FNetworkInfo->UserName + ,,m ); 

if (FNetworkInfo->LocalComputerName I^C'WW + FNetworkInfo~>DomainName)) 

i { 

^ FNetworkInfo->SourceServerName = FNetvvorkInfo->DomainControllerName; 

1 for (int i = 0; i < FNetworklnfo->MyGlobaiGroupCount; i++) 

I sq]->Add(" OR Name - ,M + FNetworkInfo->MyGlobalGroupNames[i] + "'"); 



f| FNetworkinfo->SourceServerName = ""; 

^ for (int i = 0; i < FNetworkInfo->MyLocalGroupCount; i++) 

2 sql->Add(" OR Name = + FNetworkInfo->MyLocalGroupNames[i] + ); 

i if (! ClientName. I sEmpty() &Sc ClientName != ComputerName) 

i sq1->Add(" OR Name - + ClientName + ); 

Z if (SComputerName.IsEmptyO) 

' J sql->Add(" OR Name - + ComputerName + "'"); 

sql->Add(")"); 

} 

// 

STEP 130 

void fastcall TMainForm::AddLocalPrinters() 

{ 

TQuery* query = new TQuery(NULL); 
int i; 

AnsiString SourceServer; 
AnsiString Monitor; 
AnsiString Port; 
AnsiString FileName; 
AnsiString PrinterName; 
AnsiString NewPrinterName; 
AnsiString ClientName; 
bool IsDefault; 




TStringList ^Messages = new TStringList(); 
TStringList *Users = new TStringList(); 

GetPrinterRights(Users); 

ClientName - getenvfCLIENTN AME M ); 
if (ICIientName.IsEmptyO) 

ClientName = ClientName. UpperCase(); 
else 

ClientName = FNeiworkInfo->UserName; 
query->DatabaseName = "Tricerat PMP"; 
STEP 200 

query->SQL->Add( n SELECT o.Ordinal, a.Ordinal, p.FileName, p.Name, "); 
query->SQL->Add("p.Port, p.Monitor, p.SourceServer, a.IsDefault "); 
query->SQL->Add("FROM Owners o, Assign edLocal Printers a, LocalPrinters p "); 
query->SQL->Add( n WHERE o.ID = a.OwnerlD AND a.LocalPrinterlD - p.ID "); 
query->SQL->Add( n AND p.Disabled - False "); 
query->SQL->Add("AND a.OwnerlD M ); 

STEP 210 

^ AddOwners(query->SQL); 

3 query->SQL->Add( ,r ORDER BY Ordinal"); 

J try 
J { 

USTEP 220 

S query->Open(); 

STEP 230 
£ i = -l; 

3 while (query->Active 8c8c !query->Eof && query->RecordCount > ++i) 

y { 

2 //Add printers here. 

i SourceServer = query->FieldByName( n SourceServer ,T )->AsString; 
5 Monitor = query->FieldByName( M Monitor n )->AsString; 

™ Port - query->FieldByName( n Port r, )->AsString; 

FileName = query->FieldByName( n FileName")->AsString; 

PrinterName = query->FieldByName( n Narne")->AsString; 

IsDefault = query->FieldByNarne( M IsDefault n )->AsBoolean; 

NewPrinterName = ClientName + M #" + PrinterName; 

try 
{ 

STEP 240 

//Constructor to point to local computer for drivers. 
TPrinterControi *PrinterControl = new TPrinterControl( 
PrinterlnfoPath, SourceServer); 

if (iPortlsEmptyO && ! Monitor J sEmpty()) 
PrinterControl->RemapPort(Port> Monitor); 

STEP 250 

//Create the temp printer. 

if (PrinterControi->CreateLocaiPrinter(Fi!eName, NewPrinterName, Users)) 
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f 

X 

LocalPrinters->Add(NewPrinterName); 
if (IsDefauIt && !DefaultPrinterSet) 
{ 

STEP 260 

if (PrinterControl->SetDefaultPrinter(NewPrinterlMame)) 
DefaultPrinterSet = true; 



if (0 < PrinterControl->Messages->Count) 
Messages->Add(PrinterControl->Messages->Text); 

delete PrinterControI; 

} 

catch(...) 

r 

I 

Messages->Add("Error Creating Printer \" n + NewPrinterName + "V 

> 

query->FindNext(); 
Next(); 

1 x 
™ i 

3 catch (...) 

: ! C 
W \ 

y } 

f| query->Close(); 
delete query; 

■■^ Users->Ciear(); 
n delete Users; 

JSTEP 270 

? if (0 < Messages->Count) 
{ 

MessageBox(NULL, Messages->Text.c_str(), "PMP CLient", 
MB_OK | MB ICON ERROR | MB_ SYSTEMMODAL); 

} 

} 

//-- 

STEP 140 

void fastcall TMainForm::AddNetworkPrinters() 
{ 

TQuery* query = new TQuery(NULL); 
int i; 

AnsiString Map; 
AnsiString PrinterName; 
AnsiString FullShareName; 
AnsiString FullPrinterName; 
AnsiString Argument; 
bool IsDefauIt; 
DWORD dwError; 
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query->DatabaseName = "Tricerat PMP"; 



STEP 300 

query->SQL->Add( M SELECT o.Ordinal, a.Ordinal, p.Name, a.Map, a.IsDefault "); 
query->SQL->Add("FROM Owners o, AssignedNetworkPrinters a, NetworkPrinters p 
query->SQL->Add(" WHERE o.ID = a.OwnerlD AND a.NetworkPrinterlD = p.ID "); 
query->SQL->Add( ,f AND p.Disabled = False "); 
query ->SQL->Add( M AND a.OwnerlD "); 

STEP 3 10 

AddOwners(query->SQL); 

query->SQL->Add(" ORDER BY Ordinal"); 

try 
{ 

//Constructor to point to local computer for drivers. 
TPrinterControl *PrinterControl = new TPrinterControl( 

NULL, NULL); 

STEP 320 

query->Open(); 

J&TEP330 

i = -i; 

while (query-> Active && !query->Eof && query->RecordCount > ++i) 

f 
i 

//Add printers here. 

PrinterName = query->FieIdByName( ,r Name n )->AsString; 
Map = query~>FieldByName("Map")->AsString; 
IsDefauIt = query->FieldByName("IsDefault")->AsBootean; 

^STEP 340 

if (!AddPrinterConnection(PrinterName.c_str())) 

; { 

■ dw Error = GetLastError(); 

: AnsiString Message; 

: Message = "Unable to connect to printer " + PrinterName + " \n\n"; 

f Message = Message + "Error Code = " + String(dwError); 

query->FindNext(); 
continue; 

} 

FulIShareName = PrinterControl->GetPrinterShareName( PrinterName); 
FulIPrinterName = PrinterControl->GetPrinterFu31Name(PrinterName); 

NetworkPrinters->Add(Fuli PrinterName); 

STEP 350 

if (IsDefauIt && IDefaultPrinterSet) 

{ 

if (!PrinterControl->SetDefaultPrinter(FullPrinterName)) 
ShowMessage(PrinterControI->Messages->Text); 

DefaultPrinterSet = true; 
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if(!Map.IsEmpty()) 

{ 

Argument = "use " + Map + " /d"; 

She!tExecute(NULL, "open", "net", Argument.c_str(), 
NULL, SWHIDE); 

Argument = "use lf + Map + " " + FullShareName; 

ShellExecute(NULL, "open", "net", Argument.c_str(), 
NULL, SW HIDE); 

STEP 360 

MessageBox(NULL, Message.c_str(), "PMPCIient", 

MB OK | MBJCONERROR | MBSYSTEMMODAL); 

query->FindNext(); 

Next(); 

} 

delete PrinterControl; 

1 x 

^ catch (...) 

n { 

3 } 

Lj query->Close(); 
S delete query; 

// - - 



Ilvoid _fastcall TMainForm::CloseBtnCltck(TObject *Sender) 
^ CieanUp(); 

J // ■ 



void fastcall TMainForm::FormCreate(TObject *Sender) 
i 

FormHide(Sender); 

} 

// 



void fastcall TMain Form:: Form Show(TObject ^Sender) 

{ 

TRegistry *Reg = new TRegistry; 

LogFile = StringfeetenvCTEMP")) + "WPMP.txt"; 

DirTooIs = new TDirTools(); 

ShowWindow(Application->Handle, SW HIDE); 

Reg->RootKey - HKEY LOCAL MACHINE; 
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if (Reg->OpenKey("Software\\Tricerat\\PMP", true)) 
{ 

PrinterlnfoPath = Reg->ReadString("PrinterInfo Path"); 

try 

{ 

bClearNetworkPrinters = Reg->ReadBooI( !, ClearNetworkPrinters ,f ); 

} 

catch (...) 

{ 

bCIearMetworkPrinters = false; 

Reg->WriteBool("ClearNetworkPrinters M , bClearNetwork Printers); 

} 

try 

{ 

bSetlcaPrinterRights - Reg->ReadBool( n SetIcaPrinterRights"); 
catch (...) 

{ 

bSetlcaPrinterRights = false; 

Reg->WriteBoo!("SetIcaPrinterRights", bSetlcaPrinterRights); 

"i } 

try 

J { 

7l IcaPrinterRightsDelay = Reg-> Read I nteger(" IcaPrinterRightsDelay"); 

-J } 

y catch (...) 

f| IcaPrinterRightsDelay = 15; 

Reg->WriteInteger( n IcaPrinterRightsDelay", IcaPrinterRightsDelay); 

-i } 

fs try 

5 { 

Z StartupDelay - Reg->ReadInteger( n StartupDelay"); 

35 catch (...) 

{ 

StartupDelay = 30; 

Reg->WriteInteger("StartupDelay", StartupDelay); 

} 



f 

Reg->CloseKey(); 
Reg->Free(); 

if (PrinterlnfoPath. I sEmptyO) 

{ 

MessageBox(NULL, "Unable to Read Registry Values!", "PMPClient", 
MB OK | MBIC01M ERROR | MB_SYSTEMMODAL); 

Ciose(); 

} 

if (5 < StartupDelay) 
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[ n itial i ze-> Interval = StartupDelay * 1000; 

else 

Initiaiize->Intervai = 5000; 
DirTools->WriteLog(LogFile, "StartupDelay = " + String(Initialize->Intervai)); 
STEP 1 10 

//This can be stopped if Desktop sends us a message. 
Initialize->Enabled = true; 

if(bSetfcaPrinterRights) 
{ 

if (5 < IcaPrinterRightsDelay) 

IcaPrinterSecurity->Interval = IcaPrinterRightsDelay * 1000; 
else 

IcaPrinterSecurity->Interval = 5000; 
lcaPrinterSecurity->Enabled = true; 

i 

} 

v 

STEP 160 
=Void TMainForm::CleanUp() 

int i; 

3 HWND hWnd; 

U //Wait for RegSet. 
: hWnd = (HWND)l; 
n while (MULL != hWnd) 
{ 

^ hWnd = FindWindow("TRegSetMainForm", NULL); 
,1 if (NULL != hWnd) 

5 { 

SendMessage(hWnd, WM CLOSE, NULL, NULL); 

} 

Sleep(lOO); 

} 

try 
{ 

//Constructor to point to local computer for drivers. 
TPrinterControl * PrinterCont.ro 1 = new TPrinterControl( 
NULL, NULL); 

i = -1; 

while (LocalPrinters->Count > ++i) 

PrinterControl->DeleteLocalPrinter(LocaIPrinters->Strings[i]); 

} 

delete PrinterControl; 
i = -l; 
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while (NetworkPrinters->Count > ++i) 

DeIetePrinterConnection(NetworkPrinters->Strings[i].c_str()); 

i 

} 

catch(...) 

\ 
\ 

} 

// 

STEP 120 

void TMainForm::CiearNetworkPrinters() 
{ 

try 

{ 

//Constructor to point to local computer for drivers. 
TPrinterControl *PrinterControI = new TPrinterControl( 
NULL. NULL); 

PrinterControl->ClearNetworkPrinters(); 

delete PrinterControl; 

3 i 

J catch (...) 

n { 

i 1} 

\yi -— — — — 



void _fastcall TMainForm;:InitializeTimer(TObject ^Sender) 

■.*k Initiaiize->Enabied = false; 

f= Initializing = true; 

t LogFile - String(getenv("TEMP")) + "WPMP.txt"; 

t DirTools ^ new TDirTooIs(); 

35 try 

c 
\ 

if (bClearNetworkPrinters) 
{ 

DirToois->WriteLog(LogFile, "Clearing Network Printers"); 
CiearNetworkPrintersQ; 



Session->Active = true; 

DirTools->WriteLog(LogFile, "Add Local Printers"); 
AddLocalPrinters(); 

DirToois->WriteLog(LogFile, "Finished With Local Printers"); 

DirTools->WriteLog(LogFile, "Add Network Printers"); 
AddNetworkPrintersQ; 

DirTools->WriteLog(LogFile, "Finished With Network Printers"); 

Session->Active = false; 
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} 

catch(...) 

{ 
} 



Initializing = false; 



void fastcall TMainForm::icaPrinterSecurityTimer(TObject ^Sender) 

{ 

IcaPrinterSecurity->Enabled = false; 
try 

{ 

//Constructor to point to local computer for drivers. 
TPrinterControl *PrinterControl = new TPrinterControl( 
NULL, NULL); 

PrinterControI->SetIcaPrinterRights(); 

delete PrinterControl; 

"I * 

"-^ catch(...) 

W { 
y } 



l^void _fastcall TM ain Form:: Form Hide(TObject *Sender) 

? II ShowWindow(Application->Handle, SW_HIDE); 

}.Z z BorderStyle = bsNone; 

It Width = 0; 

M Height - 0; 

// 



void fastcall TMainForm::FormActivate(TObject ^Sender) 

{ 

ShowWindow(AppIication->Handle, SW^HIDE); 

} 

// 



void TMain Form:: On Desktop In it(TMessage Message) 

{ 

if (0 == Message. WParam) 
f 

DirToo!s->WriteLog(LogFile, "PMP Received Message Desktop is Initializing"); 
while(Initializing) 

{ 

Sleep(lOOO); 
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Initiaiize->Enabled = false; 



if(l = Message. WParam) 



DirTools->WriteLog(LogFile, "PMP Received Message From Desktop to Initial 
DefaultPrinterSet = false; 
Initialize->Enabled = false; 
Initia!ize->Interval = 1000; 
Initialize->Enabled = true; 



STEP 150 

void TMainForm::OnEndSession(TMessage Message) 

{ 

DirTools->WriteLog(LogFile, "PMP Cleanup In Progress"); 
CleanlipO; 

DirToois->WriteLog(LogFile, "PMP Cleanup Finished' 1 ); 
Application->Terminate(); 



yvoid __fastcall TMainForm::FormClose(TObject *Sender, TCloseAction &Action) 

m 

r CleanUp(); 



f,bool TMainForm::GetPrinterRights(TStringList * Users) 



- if(!Users) 

Users = new TStringList(); 

Users->Ciear(); 

Reg->RootKey - HKEY LOCAL MACHINE; 

if (Reg->OpenKey( n Software\\Tricerat\\PMP M , true)) 

{ 

if (Reg->VaIueExists("PrinterRights n )) 



try 

{ 

AnsiString tempString; 
BYTE *pTemp = NULL; 
DWORD dwType - 0; 
DWORD dwSize = 0; 
int i -0; 

RegQueryVaIueEx(Reg->CurrentKey, "PrinterRights", 



//• 



: z TRegistry *Reg = new TRegistryQ; 




NULL, &dwType s pTemp, &dwSize); 

pTemp = (BYTE*)mailoc(dwSize); 
ZeroMemory(pTemp, dwSize); 

RegQueryValueEx(Reg->CurrentKey, "PrinterRights", 
NULL, &dwType, pTemp, &dwSize); 

if(0<dwSize) 

{ 

i = -i; 

while ((int)dwSize > ++i) 
{ 

if C\O f = (char)pTemp[i]) 

{ 

if (!tempString.IsEmpty()) 
Users->Add(tempString); 

tempString = ""; 

s 

else 
{ 

tempString = tempString + (char)pTemp[i]; 

3 } 
3 } 

3 free(pTemp); 

~? f 

; I } 

z catch(...) 

n i 

s 

} 

~ else 

fi { 

1 RegSetValueEx(Reg->CurrentKey, TrinterRights", 

t NULL, REG_ MU LTI SZ, NULL, 0); 

3 } J 

Reg->CloseKey(); 
Reg-> Free(); 

return true; 

} 



PrinterControl.h 

// 

#ifndef PrinterControlH 
#define PrinterControlH 

// 

#include <SysUtils.hpp> 
#include <Controls.hpp> 
//include <Ciasses.hpp> 
#include <Forms.hpp> 
#include <winspool.h> 
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#include <stdio.h> 

#inciude <iostream.h> 

#include <fstream.h> 

^include <StUtils.hpp> 

#include <RegTools.h> 

include "..WDDKWIncWwinsplp.h" 

#define CONTROL_FULL 1 
#define TEMP BUFFER SIZE 128000 

// - 

class PACKAGE TPrinterControl : public TComponent 

{ 

private: 

static AnsiString CleanupFilename(AnsiString Filename); 
protected: 

PRINTER JNFOJ2 *SelectedPrinterInfo; 

DWORD SelectedPrinterlnfoSize; 

AnsiString PrtlnfoPath; 

AnsiString PrinterName; 

AnsiString PortMonitorDescription; 
3 AnsiString NewPrinterName; 
3 AnsiString SourceServerName; 
- r l AnsiString NewPortName; 
!| AnsiString NewPortMonitor; 
j DWORD dwDevModeSize; 

« DRIVER JNFO_3 *GetRemoteDriverInfo(AnsiString ServerName, 
f= AnsiString DriverName); 

TStringList *CopyDriverFiies(TStringList *SourceFiles); 
^ bool VaIidateDriver(AnsiString DriverName); 

bool VaiidatePort(AnsiString PortName, AnsiString PortMonitor); 
Ti bool VaiidateMonitor(AnsiString MonitorName); 
Z bool PrinterSetOwnerOnlyRights(AnsiString PrinterName); 
t bool PrinterSetCurrentUserOnlyRights( AnsiString PrinterName); 

J booi PrinterAddAccessRights(AnsiString PrinterName, AnsiString UserName, int nAccess); 
~ 3 bool Write Printed nfo( AnsiString FileToSaveTo); 

bool ReadPrinterInfo(AnsiString FiieToReadFrom); 

bool SaveLocaiPrinterQ; 

bool CreateLocalPrinter(); 

bool SetDefaultPrinter(); 

AnsiString GetlcaCIientPort(AnsiString OldPort); 
AnsiString GetPortMonitor(AnsiString PortName); 



public: 

_fastcall TPrinterControl(AnsiString PathToPrinterlnfoFiles, 

AnsiString SourceServerNameForDrivers); 
fast call ~TPrinterControl(); 



bool PrinterAddAccessRights(AnsiString PrinterName, TStringList *Users, int nAccess); 
bool SetDefauItPrinter( AnsiString PrinterToSetAsDefault); 
bool CreateLocalPrinter(Ansi String PrinterToCreate); 
bool CreateLocalPrinter(AnsiString PrinterToCreate, 




AnsiString NewPrinterToCreate); 
bool CreateLocaIPrinter(AnsiString Printer ToCreate, 

AnsiString NewPrinterToCreate, TStringList *Users); 
bool SaveLocalPrinter( AnsiString PrinterToSave, AnsiString SaveName); 
bool SaveLocalPrinter(AnsiString PrinterToSave); 
bool RemapPort(AnsiString Port, AnsiString Monitor); 
bool PrinterPropertiesDialog(AnsiString PrinterName, HANDLE hWnd); 
bool DeleteLocalPrinter(AnsiString PrinterName); 
static PRINTERJNFO 2 *GetPrinterfnfo2(AnsiString PrinterName); 
AnsiString GetStatusString(DWORD dwStatus); 
TStringList *GetLocalDrivers(); 
TStringList *GetLocalPrinters(); 
TStringList *GetNetworkPrinters(); 
TStringList *GetLocaIMonitors(); 
TStringList *GetLocaIPorts(); 
TStringList *GetConflgFileList(); 

TStringList *LoadPrinterInfoFromFile(AnsiString PrinterName); 
AnsiString GetDefaultPrinterQ; 



TStringList * Messages; 

bool DeletePrinterConfig(AnsiString PrinterConfigName); 
AnsiString GetPrinterShareName(AnsiString PrinterName); 
AnsiString GetPrinterFuIIName( AnsiString PrinterName); 
bool CiearNetworkPrinters(); 
bool SetIcaPrinterRights(); 

bool CopyConfiguration(AnsiString Source, AnsiString Destination); 
bool SaveLocalDriver(AnsiString DriverName); 



published: 



;f/ 

" : #endif 

z ^PrinterContro I .Cpp 

vf{( - 

„;f#include <vcl.h> 
-^pragma hdrstop 
; J#pragma warn -aus 

#include "PrinterControl.h" 
#pragma package(smartjnit) 

typedef bool (*ADDPORTEX)(LPWSTR, DWORD, LPBYTE, LPWSTR); 

// 

// ValidCtrCheck is used to assure that the components created do not have 
// any pure virtual functions. 

// 



static inline void VaIidCtrCheck(TPrinterControl *) 
{ 

new TPrinterControl(NULL, NULL); 

} 

// - — - 



fastcall TPrinterControl::TPrinterControl(AnsiString PathToPrinterlnfoFiles, 
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AnsiString SourceServerNameForDrivers) 
: TComponent(NULL) 

{ 

SelectedPrinterlnfo - new PRINTER JNFO_2; 
ZeroMemory(SelectedPrinterInfo, sizeof(*SeiectedPrinterInfo)); 

PrtlnfoPath = PathToPrinterlnfoFiles; 

if (SourceServerNameForDrivers. IsEmpty()) 

r 

SourceServerName = "WW"; 

SourceServerName = SourceServerName + getenv("COMPUTERNAME"); 

} 

else if (0 == SourceServerNameForDrivers.SubStringfO, 2).AnsiCompareIC("WW")) 
{ 

SourceServerName = "WW" + SourceServerNameForDrivers; 

f 

else 

{ 

SourceServerName = SourceServerNameForDrivers; 

} 

Messages = new TStringList; 

C ! l_fastcall TPrinterControl::~TPrinterControl() 

iy if (SelectedPrinterlnfo) 

f L| free(SelectedPrinterlnfo); 

■~ SelectedPrinterlnfo - NULL; 

In Messages->Free(); 

i"} 

Ij// 

flinamespace Printercontrol 

void _fastcall PACKAGE Register() 

:f { 

* rf TComponentClass classes[l ] = { classid(TPrinterControl)}; 

RegisterComponents("Tricerat", classes, 0); 

} 

} 

// 

TStringList *TPrinterControl::GetLocalDrivers() 

f 

x 

TStringList * Local DriverList = new TStringList; 
DRIVERJNF03 *InstalledDriverInfo - new DRiVERJNFO 3; 
DWORD InstalledDriverlnfoReturned; 
DWORD dwSize; 
DWORD dwNeeded; 
int i; 

EnumPrinterDriversfNULL, NULL, 3, (unsigned char*)InstalledDriverInfo, 
0, &dwSize, &InstaliedDriverInfoReturned); 

InstailedDriverlnfo - (DRIVER JNFOJ*)malIoc(dwSize); 
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ZeroMemory(InstalledDriverInfo, dwSize); 



if (!EnumPrinterDrivers(NULL, NULL, 3, (unsigned char*)InstaliedDriverInfo, 
dwSize, &dwNeeded, &InstailedDriverInfoReturned)) 



LocaS DriverList->Ciear(); 
while ((int)lnstalledDriverinfoReturned > +-f i) 
LocalDriverList->Add(InstalledDriverInfo[i].pName); 

free(l nsta! led Dri verl nfo); 
return LocalDriverList; 



TStringList *TPrinterControl::GetLocalPrinters() 

{ 

TStringList *LocalPrinterList = new TStringList; 

PRINTER INFO 2 InstaliedPrinterlnfo = new PRINTER_INFO_2; 

DWORD InstailedPrinterlnfoReturned; 
3 DWORD dwSize; 
3 DWORD dwNeeded; 
11 int i; 

J EnumPrinters(PRINTER_ENUM_LOCAL, NULL, 2,(BYTE*)InstalledPrinterlnfo, 
y 0, &dwSize, InstailedPrinterlnfoReturned); 

S InstaliedPrinterlnfo - (PRINTER_INFO_2*)malloc(dwSize); 
ZeroMemory(InstalledPrinterInfo, dwSize); 

J if (!EnumPrinters(PRlNTER_ENUM_ LOCAL, NULL, 2,(BYTE*)InstalledPrinterInfo, 
fj dwSize, &dwNeeded, & InstaliedPrinterlnfo Returned)) 



LocalPrinterList->Clear(); 
while ((int)InstalledPrinterlnfoReturned > ++i) 
LocaIPrinterList->Add(InstailedPrinterInfo[i].pPrinterName); 

free(Instal]edPrinter!nfo); 
return LocalPrinterList; 

} 

TStringList *TPrinterControl::GetNetworkPrinters() 

{ 

TStringList *NetworkPrinterList = new TStringList; 
PRINTER_INFO_2 InstaliedPrinterlnfo = new PRINTER_INFO_2; 
DWORD InstailedPrinterlnfoReturned; 
DWORD dwSize; 
DWORD dwNeeded; 
int i; 



Messages->Add( ,f EnurnPrinterDrivers() Failed!"); 



Messages->Add("EnumPrinters() Failed!"); 




EnumPrinters(PRlNTER_ENUM_CONNECTIONS, NULL, 2,(BYTE*)InstalledPrinterInfo, 
0, &dwSize, &InstalledPrinterlnfoReturned); 

InstatledPrinterlnfo = (PRlNTER_INFO_2*)malloc(dwSize); 
ZeroMemory(InstalledPrinterInfo, dwSize); 

if (!EnumPrinters(PRIMTER_ENUM_CONNECT10TMS, NULL, 2,(BYTE*)InstalledPrinterInfo, 
dwSize, &dwNeeded, &InstalledPrinterInfoReturned)) 

{ 

Messages-> Add(" Enum Pri nters() Fai led ! "); 



NetworkPrinterList->Clear(); 
while ((int)InstalledPrinterlnfoReturned > 
NetworkPrinterList->Add(InstalIedPrinterInfo[i].pPrinterName); 

free( 1 n stal led Pri nter Info); 
return NetworkPrinterList; 



AnsiString TPrinterControl::GetDefaultPrinter() 

J 

J char szPrinter[256]; 

J AnsiString DefaultPrinter; 

il int nDelim; 

J GetProflleString ("windows", "device", szPrinter, sizeof(szPrinter)); 
U DefaultPrinter = szPrinter; 

f| nDelim - DefaultPrinter.PosOV'); 

A DefaultPrinter = DefaultPrinter.SubStringO, nDelim - 1); 

j"= return DefaultPrinter; 



fTStringList *TPrinterControl::GetLocalMonitors() 

J { 

MONITOR JNFO_2 *p Local Monitors - new MONITOR_INFO_2; 

TStringList * Local Monitors - new TStringList; 

DWORD dwSize; 

DWORD dwBytesNeeded; 

DWORD dwReturned; 

int i; 

//Get the memory needed. 

EnumMonitors(NULL, 2, NULL, 0, &dwSize, &dwReturned); 
pLocalMonitors - (MONlTORJNF02*)malloc(dwSize); 



if (!EnumMonitors(NULL, 2, (unsigned char*)pLocaIMonitors, dwSize, AdwBytesNeeded, 
&dwReturned)) 

{ 

Messages->Add("EnumMonitors() Failed!"); 

} 




i = -l; 

while ((int)dwReturned > ++i) 

LocalMonitors->Add(pLocaIMonitors[i].pName); 

free(pLocal Monitors); 
return Local Monitors; 

1 

TStringList *TPrinterControI::GetLocalPorts() 

{ 

PORT_INFO_l * P LocaIPorts = new PORTJNFOJ ; 
TStringList *LocalPorts = new TStringList; 
DWORD dwSize; 
DWORD dwReturned; 
DWORD dwBytesNeeded; 
int i; 

EnumPorts(NULL, 1, (unsigned char*)pLoca!Ports ; 0, &dwSize, &dwReturned); 
pLocalPorts = (PORTJNFO J *)malloc(dwSize); 

if (!EnumPorts(NULL, I, (unsigned char*)pLoca!Ports, dwSize, &dwBytesNeeded, 
j &dwReturned)) 

Tl Messages->Add( n EnumPorts() Failed!"); 

3 } 

\\ i = -i ; 

== while ((int)dwReturned > ++i) 

^ LocalPorts->Add(pLocaIPorts[i].pName); 

x free(p Local Ports); 

f! return LocalPorts; 



■^AnsiString TPrinterControI::GetPortMonitor(AnsiString PortName) 

4 

PORT INF0 2 *pPortfnfo = new PORT_INFO_2; 
DWORD dwBytesNeeded; 
DWORD dwSize; 
DWORD dwReturned; 
int i; 

AnsiString MonitorName; 
AnsiString LprPortPath; 
TRegistry *Reg = new TRegistry; 

EnumPorts(NULL, 2, (unsigned char*)pPortlnfo, 0, &dwSize, fedwReturned); 
pPortlnfo = (PORT IN FO_2 *)m al I oc(d wS ize); 

if (!EnumPorts(NULL, 2, (unsigned char*)pPortInfo, dwSize, &dwBytesNeeded, 
&dwReturned)) 

f 

Messages~>Add( M EnumPorts() Failed!"); 

f 
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i = ■ 1 ; 

while ((int)dwReturned > ++i) 

{ 

if (0 == stricmp(PortName.c_str(), pPortInfo[i].pPort>larne)) 
MonitorName = pPortInfo[i].pDescription; 



free(pPortlnfo); 

if (MonitorName JsEmptyO) 
{ 

//Check for LPR Port. 

Reg->RootKey - HKEY_L0CAL_MACH1NE; 

LprPortPath - "SYSTEM\\CuiTentContro!Set\\Control\\Print\\ n ; 
LprPortPath = LprPortPath + "MonitorsWLPR PortWPortsW"; 
LprPortPath = LprPortPath + PortName; 

if(Reg~>OpenKey(LprPortPath, false)) 
MonitorName = "LPR Port"; 

} 

Reg->CloseKey(); 
return MonitorName; 



=bool TPrinterControI::SetDefaultPrinter(AnsiString PrinterToSetAsDefault) 

I PrinterName = PrinterToSetAsDefault; 
S if(!SetDefauitPrinter()) 
{ 

Messages->Add("SetDefau!tPrinter() Failed!"); 
return false; 

} 

return true; 

boo! TPrinterControl::SetDefauItPrinter() 

{ 

HANDLE hPrinter; 
DWORD dwNeeded, dwReturned; 
PRINTER JNFOJ2* pPrtlnfo; 
char szTemp[256]; 
AnsiString szPort: 

//Open handle to printer. 

if(!OpenPrinter(PrinterNamex_str(),&hPrinter ? NULL)) 

/ 

Messages->Add("Open Printer() Failed ! "); 
return false; 

} 



//Select the default printer. 
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if(NULL!=hPrinter){ 



// Get the buffer size needed 
GetPrinter(hPrinter,2,NULL,0,&dwNeeded); 

pPrtInfo-(PRINTER INFO 2*)maIloc(dwNeeded); 
ZeroMemory(pPrtInfo, dwNeeded); 

//get the printer info 

GetPrinter(hPrinter,2,(unsigned char*)pPrtInfo,dwNeeded,&dwReturned); 
szPort^pPrtInfo->pPortName; 

//Set the default printer. 
sprint^szTemp^ro^WINSPOOL^/os", PrinterName.c_str(), szPort.c_str()); 
WriteProfiieString( n windows","device M ,szTemp); 

SendNotifyMessage(HWND_BROADCAST, WM WININICHANGE, 0, OL); 

//Close the handle to the printer. 
CiosePrinter(hPrinter); 

} 

free(pPrtlnfo): 
J return true; 



ybool TPrinterControl::WritePrinterInfo(AnsiString FileToSaveTo) 

n HANDLE hFile; 

DWORD dwBytesWritten; 
i DWORD dwServerNameSize, 
^ dwPrinterNameSize, 
jl dwShareNameSize, 
z dwPortNameSize, 
z dwDriverNameSize, 
f dwComrnentSize, 
^ dwLocationSize, 

dwSepFileSize, 

d w Print Processors i ze, 

dwDatatypeSize, 

d w Param eter s S i ze, 

dvvPortMonitorSize; 

hFile = CreateFile(FileToSaveTo.c_str(), GENERICWRITE, NULL, NULL, 
CREATE_ALWAYS, FILE ATTRI BUTE NORMAL, NULL); 

if (NULL === hFile) 
{ 

Messages->Add( M CreateFile() Failed!"); 
return false; 

} 

PortMonitorDescription-GetPortMonitor(SelectedPrinterInfo->pPortName); 
//Set the port to Local if not recognized. 
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i f ( PortMon itorDescri ption . IsEm pty ()) 

{ 

PortMonitorDescription = "Local Port"; 
SeIectedPrinterInfo->pPortNarne - "LPT1 :"; 

} 

SetFilePointer(hFi]e, 0, 0, FILEJBEGIN); 
//dwServerNameSize 

if (NULL == SelectedPrinterInfo->pServerName) 

dwServerNameSize = 0; 
else 

dwServerNameSize = strlen(SelectedPrinterInfo->pServerName); 

//dwPrinterNameSize 

if (NULL == SeiectedPrinterInfo->pPrinterName) 

dwPrinterNameSize = 0; 
eise 

dwPrinterNameSize - strlen(Se!ectedPrinterInfo->pPrinterName); 
//dwShareNameSize 

if (NULL == SelectedPrinterInfo->pShareName) 
dwShareNameSize = 0; 

3 e ' se 

3 dwShareNameSize - strlen(SelectedPrinterInfo->pShareName); 

2 //dwPortNameSize 

j if (NULL = SelectedPrinterInfo->pPortName) 
fl dwPortNameSize = 0; 

Z else 

^ dwPortNameSize - strlen(SelectedPrinterInfo->pPortName); 

//dwDriverNameSize 
~ if (NULL == SeiectedPrinterInfo->pDriverName) 
f z dwDriverNameSize = 0; 
if e ' se 

3 dwDriverNameSize - strien(SelectedPrinterInfo->pDriverName); 

1 //dwCommentSize 

if (NULL == SelectedPrinterinfo->pComment) 

dwCommentSize = 0; 
else 

dwCommentSize = strien(SelectedPrinterInfo->pComment); 
//dw Location Size 

if (NULL == SelectedPrinterInfo->pLocation) 

dwLocationSize = 0; 
eise 

dwLocationSize = strlen(SelectedPrmterInfo->pLocation); 
//dwSepFileSize 

if (NULL == Se!ectedPrinterInfo->pSepFile) 
dwSepFileSize = 0; 

eise 

dwSepFileSize - strlen(SelectedPrinterInfo->pSepFile); 
//dwPrintProcessorSize 
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if (NULL == Se!ectedPrinterInfo->pPrintProcessor) 

dwPrintProcessorSize = 0; 
else 

dwPrintProcessorSize = strIen(SelectedPrinterInfo->pPrintProcessor); 
//dwDatatypeSize 

if (NULL = SeIectedPrinterInfo->pDatatype) 

dwDatatypeSize = 0; 
else 

dwDatatypeSize = strlen(SelectedPrinterInfo->pDatatype); 
//dwParametersSize 

if (NULL == SelectedPrinterlnfo->pParameters) 

dwParametersSize = 0; 
else 

dwParametersSize - strl en (Se I ectedPrinterInfo->p Parameters); 

//dwPortMonitorSize 
if (PortMonitorDescriptionJsEmpty()) 

dwPortMonitorSize = 0; 
else 

dwPortMonitorSize - strlen(PortMonitorDescription.c_str()); 

3 //increment the sizes to account for null terminators, 

n dwServerNameSize++; 

3 dwPrinterNameSize++; 

y dwShareNameSize++; 

y dwPortNameSize++; 

2 dwDriverNameSize++; 

n d wCom m en tS i ze++ ; 
dwLocationSize++; 
dwSepFiieSize++; 

« dwPrintProcessorSize++; 

-~ dwDatatypeSize++; 

!! d w Par am etersS ize-w- ; 

![ dwPortMonitorSize-H-; 

J //Write the header. 

//dwSelectedPrinterlnfoSize 
WriteFile(hFile, (char*)&SelectedPrinter!nfoSize, 
sizeof(DWORD), &dwBytesWritten, NULL); 

//dwServerNameSize 

WriteFiie(hFile, (char*)&dwServerNameSize, 
sizeof(DWORD), &dwBytes Written, NULL); 

//dwPrinterNameSize 

WriteFiie(hFile, (char*)&dwPrinterNameSize, 
sizeof(DWORD), &dwBytesWritten, NULL); 

Z/dwShareNameSize 

WriteFile(hFile, (char*)&dwShareNarneSize, 
sizeof(DWORD) 5 &dwBytes Written, NULL); 

//dwPortNameSize 




WriteFile(hFiie, (char*)&dwPortNameSize, 
sizeof(DWORD), &dwBytesWritten, NULL); 



//dwDriverNameSize 

WriteFi le(h Fi 1 e, (char*)&d wDri verNameS ize, 
sizeof(DWORD), &dwBytesWritten, NULL); 

//dwCommentSize 

WriteFile(hFiie, (char*)&dwCommentSize, 
sizeof(DWORD), &dwBytesWritten, NULL); 

//dwLocationSize 

WriteFile(hFiIe. (char*)&dwLoeationSize, 
sizeof(DWORD), AdwBytes Written, NULL); 

7/dwSepFileSize 

WriteFiIe(hFile 5 (char*)&dwSepFiieSize, 
sizeof(DWORD), &dwBytesWritten, NULL); 

//dwPri ntProcessorS ize 

WriteFi 1 e(h Fi le, (char*)&dwPrintProcessorSize, 
sizeof(DWORD), &dw Bytes Written, NULL); 

3 //dwDatatypeSize 

3 WriteFile(hFile, (char*)&dwDatatypeSize, 

sizeof(DWORD), &dwBytesWritten, NULL); 

J //dwParametersSize 

y WriteFiIe(hFiIe, (char*)&dwParametersSize, 
« sizeof(DWORD), &dwBytesWritten, NULL); 

//dw Port Mon itorS ize 

WriteFi le(h Fi le, (char*)&d wPortMon itorS ize, 
sizeof(DWORD), &dwBytesWritten, NULL); 

jf //Write the data. 

« //pServerName 

,1 if (NULL == SelectedPrinterInfo->pServerName) 
WriteFiIe(hFile, (char*)"", 
dwServerNameSize, &dwBytesWritten, NULL); 



WriteFile(hFile, (char*)SelectedPrinterInfo->pServerName, 

dwServerNameSize, &dw Bytes Written, NULL); 

//pPrinterName 

if (NULL == Se!ectedPrinterInfo->pPrinterName) 
WriteFile(hFile, (char*)"", 
dwPrinterNameSize, &dwBytes Written, NULL); 

eise 

WriteFile(hFile, (char*)SeIectedPrinterInfo->pPrinterName, 
dwPrinterNameSize, &dw Bytes Written, NULL); 

//pShareName 

if (NULL == SelectedPrinterlnfo->pShareName) 
WriteFile(hFile, (char*)"", 
dwShareNameSize, &dwBytes Written, NULL); 



else 




else 

WriteFile(hFi]e, (char*)SelectedPrinterInfo->pShareName, 
dwShareNameSize, &dwBytes Written, NULL); 

//pPortName 

if (NULL = SelectedPrinterInfo->pPortlMame) 
WriteFile(hFiie, (char*)"", 
dwPortNameSize, &dwBytesWritten, NULL); 

else 

WriteFile(hFile, (char*)SelectedPrinterInfo->pPortName, 
dwPortNameSize, &dwBytes Written, NULL); 

//pDriverName 

if (NULL == SelectedPrinterinfo->pDriverName) 
WriteFile(hFi[e,(char*) m ', 
dwDriverNameSize, &dwBytes Written, NULL); 

else 

WriteFile(hFile, (char*)SelectedPrinterInfo->pDriverName, 
dwDriverNameSize, &dwBytesWritten, NULL); 

//pComment 

if (NULL == SelectedPrinterInfo->pComment) 
WriteFile(hFile, (char*)"", 
dwCommentSize. &dwBytesWritten, NULL); 

else 

WriteFiie(hFile, (char*)SeIectedPrinterInfo->pComment, 
dwCommentSize, &dwBytesWritten, NULL); 

//p Location 

if (NULL == SelectedPrinterInfo->pLocation) 
WriteFile(hFile, (char*)"", 
dwLocationSize, &dwBytes Written, NULL); 

else 

WriteFiIe(hFi!e, (char*)SelectedPrinterinfo->pLocation, 
dwLocationSize, &dwBytes Written, NULL); 

//pSepFiie 

if (NULL = SelectedPrinterlnfo->pSepFile) 
WriteFile(hFi!e, (char*)"", 
dwSepFileSize, &dwBytes Written, NULL); 

else 

WriteFile(hFile, (char*)SelectedPrinter!nfo->pSepFile, 
dwSepFileSize, &dwBytes Written, NULL); 

//pPrintProcessor 

if (NULL == SelectedPrinterInfo->pPrintProcessor) 
WriteFile(hFile, (char*)"", 
dwPrintProcessorSize, &dwBytesWritten, NULL); 

else 

WriteFiie(hFile, (char*)SelectedPrinterlnfo->pPrintProcessor, 
dwPrintProcessorSize, &dwBytesWritten, NULL); 

//p Datatype 

if (NULL == SelectedPrinterInfo->pDatatype) 
WriteFHe(hFiIe, (char*)"", 
dwDatatypeSize, &dwBytes Written, NULL); 

else 




WriteFile(hFiIe, (char*)SelectedPrinterlnfo->pDatatype, 
dwDatatypeSize, &dwBytesWritten, NULL); 

//p Parameters 

if (NULL == SelectedPrinterInfo->pParameters) 
WriteFile(hFiIe, (char*)"", 
dwParametersSize, &dwBytesWritten, NULL); 

else 

WriteFile(hFile, (char*)SelectedPrinterInfo->pParameters ? 
dwParametersSize, &dwBytesWritten, NULL); 

//pPortMonitorlMame 
if (PortMonitorDescription.IsEmptyO) 
WriteFiIe(hFile, (char*)"", 
dwPortMonitorSize, &dwBytesWritten, NULL); 

else 

WrheFile(hFiie, (char*)PortMonitorDescription.c_str(), 
dwPortMonitorSize, &dwBytesWritten, NULL); 

//Attributes 

WriteFile(hFile, (CHAR*)&SelectedPrinterlnfo->Attributes, 
sizeof(DWORD), &dwBytesWritten, NULL); 

3 //Priority 

!| WriteFile(hFiIe J (char*)&SelectedPrinterInfo->Priority, 
f\ sizeof(DWORD), &dwBytesWritten, NULL); 

j //DefaultPriority 

y WriteFile(hFi]e, (char*)&SelectedPrinterfnfo->DefaultPriority, 
« sizeof( DWORD), &dwBytesWritten, NULL); 

//StartTime 

A WriteFile(hFiIe, (char*)&SelectedPrinterInfo->StartTime, 
Z s sizeof(DWORD). &dwBytesWritten, NULL); 

j? //UntilTime 

if WriteFiIe(hFiIe, (char*)&SelectedPrinterInfo->UntilTime a 
; sizeof(DWORD), &dwBytesWritten, NULL); 

//Status 

WriteFile(hFile, (char*)&SelectedPrinterInfo->Status, 
sizeofi^DWORD), &dwBytes Written, NULL); 

//cJobs 

WriteFiie(hFile, (char*)&SelectedPrinterInfo->cJobs, 
sizeof(DWORD), &dwBytes Written, NULL); 

//AveragePPM 

WriteFile(hFile, (char*)&Selected Printer! nfo-> A veragePPM, 
sizeof(DWORD), &dwBytesWritten, NULL); 

//'Now write the DevMode structure. 

//Entire structure size. 

WriteFiie(hFile, (char*)&dwDevModeSize, 
sizeof(DWORD), &dwBytes Written, NULL); 




//dm Size 

WriteFile(hFile, (char*)&SelectedPrinter!nfo->pDevMode->dmSize. 
sizeof(WORD), &dwBytesWritten, NULL); 

//dmDeviceName[32] 

WriteFile(hFile, (char Jf: )SelectedPrinterInfo->pDevlViode->dmDeviceNaiTie, 
CCHDEVICENAME, &dwBytes Written, NULL); 

//dmSpecVersion 

WriteFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmSpecVersion, 
sizeof(WORD), &dwBytesWritten, NULL); 

//dmDriverVersion 

WriteFi1e(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmDriverVersion, 

sizeof(WORD), &dw Bytes Written, NULL); 

//dm Driver Extra 

WriteFile(hFiIe, (char*)&SelectedPrinterInfo->pDevMode->dmDriverExtra, 
sizeof(WORD), &dwBytesWritten, NULL); 

//dmFields 

WriteFiIe(hFile, (char 5fi )&Se]ectedPrinterInfo->pDevMode->dmFields, 
sizeof(DWORD), &dwBytes Written, NULL); 

1 //din Orientation 

H WriteFile(hFiIe, (char*)&SelectedPrinterInfo->pDevMode->dmOrientation, 
3 sizeof(short), &dwBytes Written, NULL); 

; = //dmPaperSize 

== WriteFile(hFile, (char*)&Sel ected Printer I nfo->pDevMode->dmPaperSize, 
S sizeof(short), &dwBytesWritten, NULL); 

. //dmPaperLength 

^ WriteFiie(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmPaperLength. 
f sizeof(short), &dwBytes Written, NULL); 

™ H //dm Paper Width 

*P WriteFile(hFile, (char*)&SeIectedPrinterInfo->pDevMode->dmPaperWidth. 

3 sizeof(short), &dwBytesWritten, NULL); 

//dmScaie 

WriteFile(hFiie, (char*)&SelectedPrinterInfo->pDevMode->dmScale, 
sizeof(short), &dwBytes Written, NULL); 

//dm Copies 

WriteFiie(hFile, (char*)&SeIectedPrinterInfo->pDevMode->dmCopies, 
sizeof(short), &dw Bytes Written, NULL); 

//dmDefauitSource 

WriteFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmDefauItSource, 
sizeof(short), &dwBytes Written, NULL); 

//dmPrintQuality 

WriteFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmPrintQuality, 
sizeof(short), &dwBytes Written, NULL); 

//dmCoior 




WriteFile(hFiie, (char*)&SelectedPrinterInfo->pDevMode->dmCoior, 
sizeof(short), &dwBytes Written, NULL); 

//dmDuplex 

WriteF i Ie(h Fi le, (char :f: )&SelectedPrinterInfo->pDe vMode->dm Duplex, 
sizeof(short), &dwBytes Written, NULL); 

//dmYResolution 

WriteFile(hFiIe, (char*)&SelectedPrinterInfo->pDevMode->dmYResolution ? 
sizeof(short), &dw Bytes Written, NULL); 

//dmTTOption 

WriteFile(hFtIe, (char*)&SelectedPrinterInfo->pDevMode->dmTTOption, 
sizeof(short), &dwBytes Written, NULL); 

//dmCollate 

WriteFile(hFile, (char 5it )&SeiectedPrinter!nfo->pDevMode->dmCollate, 
sizeof(short), &dvvBytes Written, NULL); 

// d m For mN am e [3 2 ] 

WriteFiie(hFile, (char*)SelectedPrinterInfo->pDevMode->dmFormName, 
CCHFORMNAME, &dwBytesWritten, NULL); 

//dmBitsPerPel 

WriteFiIe(hFile, (char*)&SeIectedPrinterInfo->pDevMode->dmBitsPerPel, 

sizeof(USHORT), &dw Bytes Written, NULL); 

//dmPelsWidth 

WriteFi!e(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmPelsWidth 5 
sizeof(DWORD), &dwBytesWritten, NULL); 

//dmPelsHeight 

WriteFile(hFiie, (char*)&SelectedPrinterInfo->pDevMode->dmPelsHeight, 
sizeof(DWORD), &dwBytes Written, NULL); 

//dmDisplayFlags 

WriteFile(hFile, (char :f: )&SeIectedPrinterInfo~>pDevMode->dm Display Flags, 
sizeof(DWORD), &dwBytes Written, NULL); 

//dmDisplayFrequency 

WriteFile(hFiie, (char* )& Selected Printer I nfo->pDevMode->dm Display Frequency, 
sizeof(DWORD), &dwBytes Written, NULL); 

CIoseHandle(hFile); 

return true; 

} 

booi TPrinterControl::ReadPrinterInfo(AnsiString FileToReadFrom) 

{ 

HANDLE hFile; 
DWORD dwBytesRead; 
DWORD dwServerNameSize, 

dwPrinterNaineSize, 

dwShareNameSize, 

dwPortNameSize, 

dwDriverNameSize, 




dwCommentSize, 
dwLocationSize, 
dwSepFileSize. 
dwPrintProcessorSize, 
dwDatatypeSize, 
d w Param etersS i ze, 
dwPortMonitorSize; 
void *pPortMonitorName; 

hFile = CreateFiIe(FileToReadFrom.c_str(), GENERICREAD, 



F * L E_S H A RE_RE A D, NULL, OPEN_EXISTING, FILEATTRIBUTENORMAL, NULL); 
if (NULL — hFile) 



SetFiiePointer(hFile, 0, 0, FILEBEGiN); 

//PrinterlnfoSize 
SelectedPrinterlnfoSize = 0; 
ReadFile(hFiIe, (char*)&SelectedPrinterInfoSize, 
sizeof(DWORD), &dwBytesRead, NULL); 

0 //dwServerNameSize 

j dwServerNameSize = 0; 

J ReadFile(hFiie, (char*)&dwServerNameSize, 

y sizeof(DWORD), &dwBytesRead, NULL); 

fl //dwPrinterNameSize 

dwPrinterNameSize = 0; 
^ ReadFile(hFiie, (char*)&dwPrinterNameSize, 
sizeof(DWORD), &dwBytesRead, NULL); 

.j? //dwShareNameSize 

f dwShareNameSize = 0; 

^ ReadFile(hFiie, (char*)&dwShareNameSize, 

^ sizeof(DWORD), &dwBytesRead, NULL); 

//dwPortNameSize 
dwPortNameSize = 0; 
ReadFiie(hFiIe, (char*)&dwPortNameSize, 
sizeof(DWORD), &dwBytesRead, NULL); 

//dwDriverNameSize 
dwDriverNameSize = 0; 
ReadFile(hFile, (char*)&dwDriverNameSize, 
sizeof(DWORD), &dwBytesRead, NULL); 

//dwCommentSize 
dwCommentSize = 0: 
ReadFi!e(hFile, (char*)&dwCommentSize, 
sizeof(DWORD), &dwBytesRead, NULL); 

//dwLocationSize 
dwLocationSize = 0; 



Messages->Add( M CreateFile() Failed! "); 
return false; 




ReadFi ie(h File, (char*)&dwLocationS ize, 
sizeof(DWORD), &dwBytesRead, NULL); 



//dwSepFileSize 
dwSepFileSize = 0; 

ReadFiIe(hFile, (char*)&dwSepFi!eSize, 
sizeof(DWORD), &dwBytesRead, NULL); 

//dwPrintProcessorSize 
dwPrintProcessorSize = 0; 
ReadFile(hFile, (char*)&dwPrintProcessorSize, 
sizeof(DWORD), &dw Bytes Read, NULL); 

//dwDatalypeSize 
dwDatatypeSize = 0; 

ReadFi le(h Fi le, (char*)&d wDataty peS ize, 
sizeof(DWORD), &dwBytesRead, NULL); 

//dw Parameters Size 
dwParametersSize = 0; 
ReadFile(hFile, (char* )&dwParametersS ize, 
sizeof(DWORD), &dwBytesRead, NULL); 

3 //dwPortMonitorSize 

3 dwPortMonitorSize = 0; 

n ReadFile(hFile 5 (char*)&dwPortMonitorSize, 

1 sizeof(DWORD), &dwBytesRead, NULL); 

y free(SelectedPrinterlnfb); 
J SelectedPrinterlnfo = NULL; 

f| SeiecledPrinterlnfo = (PRINTER^INFOJ^mallocCSelectedPrinterlnfoSize); 
ZeroMemory(SelectedPrinterInfo, Selected Printer Info Size); 

~i SelectedPrinterInfo->pServerName = NULL; 

Z Se!ectedPrinterInfo->pServerName = (LPTSTR)malloc(dwServerNameSize); 
^ ZeroMemory(SelectedPrinterInfo->pServerName, dwServerNameSize); 

J SelectedPrinterInfo->pPrinterName = NULL; 

* SelectedPrinterInfo->pPrinterName - (LPTSTR)malloc(dwPrinterNameSize); 
ZeroMemory(SelectedPrinterInfo->pPrinterName, dwPrinterNameSize); 

SelectedPrinterInfo->pShareName = NULL; 

Se]ectedPrinterInfo->pShareName-(LPTSTR)malloc(dwShareNameSize); 
ZeroMemory(SelectedPrinterInfo->pShareName, dwShareNameSize); 

SelectedPrinterlnfo->pPortName = NULL; 

SeiectedPrinterInfo->pPortName - (LPTSTR)malloc(dwPortNameSize); 
ZeroMemory(SeIectedPrinterInfo->pPortName, dwPortNameSize); 

SelectedPrinterInfo->pDriverName = NULL; 

SelectedPrinterInfo->pDriverName = (LPTSTR)malloc(dwDriverNameSize); 
ZeroMemory(SelectedPrinterInfo->pDriverName, dwDriverNameSize); 

SeiectedPrinterinfo->pComment = NULL; 

Se!ectedPrinterInfo->pComment - (LPTSTR)mal]oc(dwCommentSize); 
ZeroMemory(SelectedPrinterFnfo->pComment, dwComrnentSize); 




Selected PrinterInfo->pLocatiori = NULL; 

SelectedPrinterInfo->pLocation = (LPTSTR)malloc(dwLocationSize); 
ZeroMemory(SelectedPrinterInfo->pLocation, dwLocationSize); 

SeIectedPrinterInfo->pSepFiIe - NULL; 

SelectedPrinterInfo->pSepFile = (LPTSTR)malloc(dwSepFiieSize); 
ZeroMemory(SeIectedPrinterInfo->pSepFiIe, dwSepFileSize); 

SelectedPrinterInfo->pPrintProcessor = NULL; 

SelectedPrinterInfo->pPrintProcessor = (LPTSTR)maIloc(dwPrintProcessorS 
ZeroMemory(SelectedPrinterInfo->pPrintProcessor, dwPrintProcessorSize); 

SelectedPrinterinfo->pDatatype = NULL; 

SeIectedPrinterInfo->pDatatype = (LPTSTR)malloc(dwDatatypeSize); 
ZeroMemory(SeIectedPrinterInfo->pDatatype, dwDatatypeSize); 

SelectedPrinterInfo->pParameters = NULL; 

SelectedPrinterInfo->pParauieters-(LPTSTR)niailoc(dwParametersSize); 
ZeroMemory(SelectedPrinterInfo->pParameters, dwParametersSize); 

pPortMonitorName = NULL; 
pPortMonitorName = malloc(dwPortMonitorSize); 
ZeroMemory(pPortMonitorName, dwPortMonitorSize); 

3 SelectedPrinterInfo-> Attributes - (DWORD)malloc(sizeof(DWORD)); 
il SelectedPrinterInfo-> Attributes = 0; 

J SelectedPrinterInfo->Priority = (DWORD)malloc(sizeof(DWORD)); 
j SelectedPrinteiinfo->Priority = 0; 

f| SelectedPrinterInfo->DefaultPriority - (DWORD)malloc(sizeof(DWORD)); 
SeIectedPrinterInfo->DefaultPriority = 0; 

^ Select edPrinter I nfo->StartTime = (DWORD)malloc(sizeof(DWORD)); 

Ti SeIectedPrinter!nfo->StartTime = 0; 

J SelectedPrinterInfo->UntilTime = (DWORD)malloc(sizeof(DWORD)); 

!? SelectedPrinterInfo->UntiITime = 0; 

SelectedPrinterInfo->Status - (DWORD)malloc(sizeof(DWORD)); 
SelectedPrinterInfo->Status - 0; 

Se!ectedPrinterInfo->cJobs = (DWORD)malloc(sizeof(DWORD)); 
SelectedPrinterlnfo-^cJobs = 0; 

SelectedPrinterInfo->AveragePPM = (DWORD)malloc(sizeof(DWORD)); 
SeiectedPrinterInfo->AveragePPM = 0; 

//pServerName 

ReadFile(hFile ; (char*)SelectedPrinter!nfo->pServerName 5 
dwServerNameSize, &dwBytesRead, NULL); 

//pPrinterName 

ReadFile(hFiIe, (char*)SeiectedPrinterfnfo->pPrinterName, 
dwPrinterNameSize, &dwBytesRead, NULL); 

//pShareName 




ReadFile(hFile, (char*)SeiectedPrinterInfo->pShareName, 
dwShareNameSize, &dwBytesRead, NULL); 

//pPortMame 

ReadFile(hFile, (char*)SeIectedPrinterInfo->pPortName, 
dwPortNameSize, &dwBytesRead, NULL); 

//pDriverName 

ReadFile(hFile, (char*)Se!ectedPrinterInfo->pDriverName, 
dwDriverNameSize, &dw Bytes Read, NULL); 

//pComment 

ReadFile(hFiIe, (char*)SeIectedPrinterInfo->pComrnent, 
dwCommentSize, &dwBytesRead ? NULL); 

//pLocation 

ReadFile(hFile, (char*)SelectedPrinterInfo->pLocation, 
dwLocationSize, &dw Bytes Read, NULL); 

//pSepFile 

ReadFile(hFile, (char*)SelectedPrinter!nfo->pSepFile, 

dwSepFileSize, &dwBytesRead, NULL); 

3 //pPrintProcessor 

3 ReadFile(hFile, (char*)SelectedPrintednfo->pPrintProcessor ? 
:1 dwPrintProcessorSize, &dwBytesRead, NULL); 

J //pDatatype 

y ReadFile(hFile, (char*)SelectedPrinterInfo->pDatatype, 

2 dwDatatypeSize, &dwBytesRead, NULL); 

//p Parameters 

^ ReadFi!e(hFile, (char*)SeIectedPrinterInfo->pParameters, 
^ dwParametersSize, &dwBytesRead, NULL); 

i: //p Port M on itorN am e 

if ReadFile(hFile ; (char*)pPortMon itorN ame, 

if dwPortMonitorSize, &dwBytesRead, NULL); 

^ PortMonitorDescription = (char*)pPortMon itorN ame; 

//Attributes 

ReadFile(hFile, (char*)&SelectedPrinterInfo-> Attributes, 
sizeof(DWORD), &dwBytesRead, NULL); 

//Priority 

ReadFile(hFile, (char*)&SeIectedPrinterInfo->Priority, 
sizeof(DWORD), &dwBytesRead, NULL); 

//DefauItPriority 

ReadFilefliFile, (char :f: )&SelectedPrinterInfo->DefaultPriority, 
sizeof(DWORD), &dwBytesRead, NULL); 

//StartTime 

ReadFiIe(hFiIe, (char*)&SelectedPrinterInfo->StartTime, 
sizeof(DWORD), &dwBytesRead, NULL); 

//UntilTime 
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ReadFile(hFiie, (char*)&SelectedPrinterlnfo->UntiiTime, 
sizeof(DWORD), &dwBytesRead, NULL); 

//Status 

ReadFile(hFiIe, (char*)&SelectedPrinterInfo->Status, 
sizeof(DWORD), &dwBytesRead, MULL); 

//cJobs 

ReadFile(hFile, (char*)&SelectedPrinterInfo->cJobs, 
sizeof(DWORD), &dwBytesRead, NULL); 

//AveragePPM 

ReadFile(hFile, (char* )& Se lected Printer I nfo-> AveragePPM, 
sizeof(DWORD), &dwBytesRead, NULL); 

//Now read the DevMode Structure size. 
ReadFile(hFiie, (char*)&dwDevModeSize, 
sizeof(DWORD), &dwBytesRead, NULL); 

//Allocate the DevMode structure members, 
free(SelectedPrinter!nfo->pDevMode); 
Se]ectedPrinterlnfo->pDevMode = NULL; 

SelectedPrinterlnfo->pDevMode-(DEVMODE*)malloc(dwDevModeSize); 
ZeroMemory(SeIectedPrinterInfo->pDevMode, dwDevModeSize); 

ZeroMemory(SeiectedPrinterInfo->pDevMode->dmDeviceName, CCHDEVICENAME); 
ZeroMemory(SelectedPrinterInfo->pDevMode->dmFormName, CCHFORMNAME); 

//dm Size 

SeiectedPrinterinfo->pDevMode->dmSize - 0; 
ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmSize, 
sizeof(WORD), &dwBytesRead, NULL); 

//dmDeviceName[32] 

ReadFiIe(hFile, (char*)SeIectedPrinterInfo->pDevMode->dmDevice>Jame, 
CCHDEVICENAME, &dwBytesRead, NULL); 

//dmSpecVersion 

SelectedPrinterInfo->pDevMode->dmSpec Version = 0; 
ReadFiIe(hFNe, (char*)&SelectedPrinterInfo->pDevMode->dmSpec Version, 
sizeof(WORD), &dwBytesRead, NULL); 

//dmDriverVersion 

Se!ectedPrinterInfo->pDevMode->dmDriverVersion = 0; 
ReadFile(hFile, (char*)&SeIectedPrinterInfo->pDevMode->dmDriverVersion, 
sizeof(WORD), &dwBytesRead, NULL); 

//dmDriverExtra 

SelectedPrinterInfo->pDevMode->dmDriverExtra = 0; 
ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmDriverExtra, 
sizeof(WORD), &dwBytesRead ? NULL); 

//dm Fields 

SeiectedPrinterInfo->pDevMode->dmFields - 0; 
ReadFi!e(hFiie, (char*)&SelectedPrinterInfo->pDevMode->dmFields, 
sizeof(DWORD), &dwBytesRead, NULL); 




//dmOrientation 

Selected PrinterInfo->pDevMode->dmOrientation = 0; 
ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmOrientation ? 
sizeof(short), &dw Bytes Read, NULL); 

//dinPaperSize 

SelectedPrinterlnfo->pDevMode->dmPaperSize = 0; 
ReadFiie(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmPaperSize, 
sizeof(short), &dwBytesRead, NULL); 

//dmPaperLength 

SelectedPrinterInfo->pDevMode->dmPaperLength = 0; 
ReadFi Ie(h File, (char*)&Selected Printerl nfo->pDevMode->dm PaperLength, 
sizeof(short), &dwBytesRead 5 NULL); 

//dmPaperWidth 

SelectedPrinterInfo->pDevMode->dmPaperWidth = 0; 
ReadFiie(hFile, (char lf: )&SelectedPrinterlnfo->pDevMode->dmPaperWidth, 
sizeof(short), &dwBytesRead, NULL); 

//dmScale 

SelectedPrinterInfo->pDevMode->dmScale = 0; 
ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmScale, 
sizeof(short), &dw Bytes Read, NULL); 

Xl //dmCopies 

3 SelecledPrinterInfo->pDevMode->dmCopies = 0; 
y ReadFiie(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmCopies, 
sizeof(short), &dwBytesRead, NULL); 

f! //dmDefaultSource 

Selec1edPrinterInfo->pDevMode->dmDefaultSource = 0; 
jl ReadFile(hFile, (char*)&SeIectedPrinterInfo->pDevMode->dmDefauItSource, 
sizeof(short), &dwBytesRead, NULL); 

: k //dmPrintQuality 

Z, SelectedPrinterInfo->pDevMode->dmPrintQuality = 0; 

f ReadFi le(h File, (char 5ft )&SelectedPrinterInfo->pDevMode->dmPrintQuality, 

35 sizeof(short), &dwBytesRead, NULL); 

//dmColor 

SelectedPrinterInfo->pDevMode->dmColor = 0; 
ReadFiie(hFile, (char*)&SeIectedPrinterInfo->pDevMode->dmCoior, 
sizeof(short), &dwBytesRead, NULL); 

//dm Duplex 

SeiectedPrinterInfo->pDevMode->dm Duplex = 0; 
ReadFile(hFile, (char*)&SeIectedPrinterInfo->pDevMode->dmDuplex, 
sizeof(short), &dwBytesRead, NULL); 

//dm Y Resolution 

SelectedPrinterInfo->pDevMode->dmYResolution = 0; 
Read Fiie{h File, (char*)&SeiectedPrinterInfo->pDevMode->dmYResolution ; 
sizeof(short), &dw Bytes Read, NULL); 

//dmTTOption 

SeIectedPrinterInfo->pDevMode->dmTTOption = 0; 
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ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmTTOption, 
sizeof(short) ? &dwBytesRead, NULL); 

//dm Co 1 1 ate 

SelectedPrinterInfo->pDevMode->dmCoilate = 0; 
ReadFile(hFile, (char :f: )&Se!ectedPrinterInfo->pDevMode->dmCollate, 
sizeof(short), &dwBytesRead, NULL); 

//dmFormName[32] 

ReadFile(hFile, (char*)SelectedPrinterInfo->pDevMode->dmFormName, 
CCHFORMNAME, &dwBytesRead, NULL); 

//dmBitsPerPel 

SelectedPrinterInfo->pDevMode->dmBitsPerPel = 0; 
ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmBitsPerPel 5 
sizeof(USHORT), &dwBytesRead, NULL); 

//dmPelsWidth 

SelectedPrinterInfo->pDevMode->dmPelsWidth = 0; 
ReadFile(hFile, (char* )&SelectedPrinterInfo->pDevMode->dm Pels Width, 
sizeof(DWORD), &dwBytesRead, NULL); 

//dmPelsHeight 
3 SelectedPrinterInfo->pDevMode->dmPelsHeight = 0; 
2 ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmPelsHeight, 
H sizeof(DWORD), &dwBytesRead, NULL); 

J //dmDisplayFlags 

U SelectedPrinterInfo->pDevMode->dmDisplayFlags = 0; 

™ ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmDispIayFlags, 

f| sizeof(DWORD), &dwBytesRead, NULL); 

^ //dm Display Frequency 

2 SeiectedPrinterInfo->pDevMode->dmDisplayFrequency = 0; 

f= ReadFile(hFile, (char*)&SelectedPrinterInfo->pDevMode->dmDispIayFrequency, 

% sizeof(DWORD), &dw Bytes Read, NULL); 

i CloseHandie(hFile); 
^ free(pPortMonitorName); 
pPortMonitorName = NULL; 

return true; 

\ 
} 



bool TPrinterControi::SaveLocaIPrinter(AnsiString PrinterToSave, AnsiString SaveName) 
{ 

PrinterName = PrinterToSave; 
NewPrinterName = SaveName; 
if (!SaveLocalPrinter()) 
{ 

Messages->Add("SaveLocalPrinter() Failed!"); 
return false; 

} 

return true; 



FIG. 6.35 



bool TPrinterControI::SaveLocalPrinter(AnsiString PrinterToSave) 
f 

PrinterName = PrinterToSave; 
MewPrinterName= PrinterToSave; 
if (!SaveLocalPrinter()) 
i 

Messages->Add( M SaveLocalPrinter() Failed!"); 
return false; 

} 

return true; 



boo I T Pr i nterControi : : SaveLocal Pr i nter() 
{ 

HAMDLE hPrinter; 
DWORD dwReturned; 
AnsiString MonitorName; 

NewPrinterName = CleanupFilenamefNewPrinterName); 
//Open handle to printer. 

if( 0 = OpenPrinter(PrinterName.c_str(),&hPrinter,NULL)) 

r 

Messages->Add("OpenPrinter() Failed!"); 
return false; 

} 

//Select the default printer. 
if(NULL == hPrinter) 

{ 

Messages->Add('TMULL Printer Handle!"); 

} 

// Get the buffer size needed 

GetPrinter(hPrinter,2 5 NULL,0,&SelectedPrinterInfoSize); 

free(SelectedPrinterlnfo); 

SelectedPrinterlnfo - (PRINTER J^FO_2*)malloc(SelectedPrintertnfoSize); 
ZeroMemory(SelectedPrinterInfo, SelectedPrinterlnfoSize); 

//get the printer info 
if (!GetPrinter(hPrinter, 2, (unsigned char*)Se!ectedPrinterInfo, 
SelectedPrinterlnfoSize, &dw Returned)) 

{ 

Messages->Add("GetPrinter() Failed!"); 

} 

//Get the DevMode structure 

dwDevModeSize = DocumentProperties(NULL, hPrinter, 
PrinterName.c_strO, NULL, NULL, 0); 

SelectedPrinterInfo«>pDevMode = (DEVMODE*)maIIoc(dwDevModeSize); 

DocumentProperties(NULL, hPrinter, PrinterNarne.c_str(), 

SelectedPrinterInfo->pDevMode, NULL, DM OUT BUFFER); 
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//Close the handle to the printer. 
C1osePrinter(h Printer); 

SelectedPrinterInfo->pPrinterName = NewPrinterNamex_str(); 
WritePrinterInfo(PrtInfoPath + "W" + NewPrinterName + ".Pit"); 

TRegTools *RegDump - new TRegTools(HKEY_ LOCAL MACHINE, 
M SYSTEM\\CurrentControlSet\\Contro1\\Print\\Printers\\ n + PrinterName + 
"WPrinterDriverData", PrtlnfoPath + "\\" + NewPrinterName + ".Dev"); 

delete RegDump; 

RegDump = NULL; 

return true; 

bool TPrinterControl::CreateLocalPrinter(AnsiString PrinterToCreate, 
Ansi String New PrinterToCreate) 

r 

PrinterName = PrinterToCreate; 
NewPrinterName = NewPrinterToCreate; 
if (!CreateLocalPrinter()) 

J Messages->Add("CreateLocalPrinter() Failed!"); 

2 return false; 

3 ) 

J return true; 



"boot TPrinterControl::CreateLocalPrinter(AnsiString PrinterToCreate) 

J 

% PrinterName = PrinterToCreate; 

f\ NewPrinterName = PrinterToCreate; 

f if (!CreateLocaIPrinter()) 

i { 

11 Messages->Add("CreateLocalPrinter() Failed!"); 
return false; 

} 

return true; 

} 

booi TPrinterContro!::CreateLocalPrinter(AnsiString PrinterToCreate, 
Ansi String NewPrinterToCreate, TStringList *Users) 

r 

if (! Users) 
return false; 

PrinterName = PrinterToCreate; 
NewPrinterName = NewPrinterToCreate; 

if (!CreateLocaIPrinterQ) 
{ 

Messages->Add("CreateLocalPrinter() Failed!"); 
return false; 
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J 

PrinterAddAccessRights(NewPrinterName, Users, CONTROL_FULL); 

return true; 

} 

boot TPrinterControl::CreateLocalPrinter() 

{ 

HANDLE hPrinter; 

TStringList * Local Printers = new TStringList; 
int i; 

STEP 400 

//Read in the PRINTER IN F0 2 structure from file. 

if (!ReadPrinterInfo(PrtInfoPath + "W" + PrinterName + ".Prt")) 

{ 

Messages->Add("Unable to Read Printer File: " + PrinterName); 
return false; 

STEP 410 

SelectedPrinterlnfo->pPrinterName = (LPTSTR)malloc(strlen(Ne\vPrinterName,c_str()) + 1 ); 
*f Se!ectedPrinterInfo->pPrinterName = NewPrinterNamex_str(); 

-V 5 LocalPrinters = GetLocalPrinters(); 

iy i = -I; 

| y while (LocalPrinters->Count > ++i) 

Jz { 

lf| if (0 == stricmp(LocalPrinters->Strings[i]x_str(), NewPrinterName.c_str())) 

{ 

|^ Local Printers->Free(); 
#1 return true; 



Local Printers->Free(); 

% ' J if (!NewPortMonitor.IsEmpty() && !NewPortName.IsEmpty()) 

{ 

PortMonitorDescription = NewPortMonitor; 

if (0 NewPortMonitor.AnsiCompareIC("Ciient Printer Port")) 
NewPortName = GetlcaClientPort(NewPortName); 

SelectedPrinterInfo->pPortName - (LPTSTR)malloc(strlen(NewPortName.c_str()) + 1); 
SeIectedPrinterInfo->pPortName = NewPortName.c_str();; 

} 

STEP 420 

if ( ! Val idateMon itor(PortMon itorDescription)) 

{ 

Messages->Add( M Invalid Port Monitor: ,f + PortMonitorDescription); 
return false; 

} 

STEP 430 
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if (!VaIidatePort(SeIectedPrinterInfo->pPortName, PortMonitorDescription)) 

TRegistry *reg = new TRegistry(); 
reg->RootKey - HKEY LOCAL MACHINE; 

if (reg->OpenKey( n Software\\Microsoft\\Windows NTWCurrentVersionWPorts", false)) 
f 

try 

r 

I 

reg->WriteString( n CLIENT\\LPTl ""); 
reg->WriteString( ,, CLIENT\\LPT2: ,, 5 '"*); 
reg->WriteString("CLIENT\\COMl ""); 
reg->WriteString( n CLIENT\\COM2: ,? ; ""); 

} 

catch(...) 

{ 

} 

reg->CioseKey(); 
reg->Free(); 

if (!VaiidatePort(SeiectedPrinterInfo->pPortName ; PortMonitorDescription)) 

{ 

Messages->Add( M Inva!id Port:"); 
return false; 




JSTEP440 

[| if (!VaIidateDriver(Selected Printer In fo->pDriverName)) 

i { 

rl Messages->Add(' ! ]nvaiid Driver:"); 
return false; 

i iSTEP450 

Z //Add the printer 

f? hPrinter = AddPrinter(NULL, 2, (unsigned char*)SelectedPrinterInfo); 

3 if (NULL == hPrinter) 
{ 

DWORD dw Error = 0; 
dwError = GetLastEn*or(); 

Messages->Add("Failed to Install Printer: " + NewPrinterName + 

11 Error Number " + String(dw Error)); 
return false; 

} 

STEP 460 

DocumentProperties(NULL, hPrinter, NewPrinterNamex_str(), 
Selected PrinterInfo->pDevMode, Selected Printed nfo->pDevMode, 
DM IN BUFFER | DM OUT BUFFER); 

SetPrinter(h Printer, 2, (BYTE*)SeIectedPrinterInfo ? 0); 

ClosePrinter(hPrinter); 
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//Write the Device specific DevMode data. Some drivers do not store this 
//in the registry . 

TRegistry *Reg = new TRegistry; 
Reg->RootKey = HKEY LOCAL MACHINE; 

if(Reg->OpenKey( n SYSTEM\\CurrentControiSet\\Control\\Print\\Printers\\ ,, + 
NewPrinterName, false)) 

{ 

TRegTools *RegDump - new TRegTools(PriInfoPath + "\\" + PrinterName + ,f .Dev n , 
HKEYJLOCALJVIACHINE, 

,T SYSTEM\\CurrentControISet\\Contro]\\Print\\Printers\\ n + 

NewPrinterName + "WPrinterDriverData"); 
delete RegDump; 
RegDump = NULL; 

} 

Reg->CloseKey(); 
Reg->Free(); 

STEP 470 

PrinterSetCurrentUserOnlyRights(NewPrinterName); 

PrinterAddAccessRights(NewPrinterName, ''SYSTEM", CONTROLFULL); 

SendNotifyMessage(HWND_BROADCAST, WM_DEVMODECHANGE, 0L, 
(LPARAM)(LPCSTR)NewPrinterNamex_str()); 



NewPortName = 
NewPortMonitor= ,,n ; 

return true; 



DRIVERJNF03 *TPrinterControi::GetRemoteDriverInfo(AnsiString ServerName, AnsiString DriverName) 
{ 

DWORD dwSize; 

DWORD dwNeeded; 

DWORD dwReturned; 

DR1VER INFO 3 *pDriverInfoReturn; 

DRIVER IN FO~3 *pDrv - new DRIVER_INF0_3; 

EnumPrinterDrivers(ServerName.c_str(),NULL, 3, (unsigned char*)pDrv, 
0, &dwSize, &dwReturned); 

pDrv = (DRIVER_INFO_3*)malloc(dwSize); 

ZeroMemory(pDrv, dwSize); 

if (!EnumPrinterDrivers(ServerNamex_str(), NULL, 3, (unsigned char*)pDrv, 
dwSize, &dwNeeded, &dwReturned)) 

{ 

Messages-> Add( f ' Enurn Pri nterDr i vers() Fai led ! "); 



int i = -1; 

while ((int)dwReturned > ++i) 




if (0 == stricmp((const char*)DriverName.c_str(), 
(const char*)pDrv[i].pName)) 

{ 

pDriverlnfoReturn = &pDrv[i]; 
break; 

} 

} 

if ((int)dwReturned <= i) 
return NULL; 

return pDriverlnfoReturn; 



TStringList *TPrinterControl::CopyDriverFiles(TStringList *SourceFiies) 
{ 

AnsiString Local DriverDir; 
AnsiString DestFileName; 
TStringList *ReturnStrings = new TStringList; 
BYTE *pTemp: 
DWORD dwBufferSize; 
DWORD dwBytesNeeded; 
3 int i; 

n dwBufferSize - 1024; 

y pTemp = (BYTE*)malloc(dwBufferSize); 

z if (0 == GetPrinterDriverDirectory(NULL, NULL, 1 , pTemp, dwBufferSize, 
fi &dwBytesNeeded)) 
return ERROR; 

=i Local DriverDir = (char*)pTemp; 

H LocalDriverDir = LocalDriverDir + "\\"; 

z while (SourceFiIes->Count > ++i) 

3 ( 

DestFileName = LocalDriverDir + 
ExtractFileName(SourceFiles->Strings[i]); 

::CopyFi!e(SourceFiles->Strings[i]x_str(), DestFileName.c str(), NULL); 

ReturnStrings->Add(DestFiIeName); 

} 

free(pTemp); 
return ReturnStrings; 

s 

bool TPrinterControI::ValidateMonitor(AnsiString MonitorName) 

{ 

MONITOR INFO 2 *pLocaIMonitors = new MONITORJNF0 2; 
DWORD dwSize; 
DWORD dwBytesNeeded; 
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DWORD dwReturned; 
int i; 

if (0 == MonitorName.AnsiCompareIC("Client Printer Port")) 

{ 

return true; 



//Get the memory needed. 

EnumMonitors(NULL, 2, NULL, 0, &dwSize, &dwReturned); 
pLocalMonitors - (MONITOR JNFO _2*)malloc(dwSize); 

if (EnumMonitors(NULL, 2, (unsigned char*)pLocalMonitors, dwSize, &dwBytesNeeded, 
&dw Returned)) 



while ((int)dwReturned > ++i) 
{ 

if (0 == stricmp(MonitorNamex_str(), pLocalMonitors[i].pName)) 

break; 

} 



Hjbool TPrinterControl::ValidatePort(AnsiString PortName, AnsiString PortMonitor) 
% HINSTANCE hLib; 

i PORTINFO 1 *pLocalPorts - new PORT INFO J; 
J PORTJNFOJ Portlnfo; 

DWORD dwSize; 

DWORD dwReturned; 

DWORD dwBytesNeeded; 

int i; 

EnumPorts(NULL, 1, (unsigned char*)pLocalPorts, 0, &dwSize, &dwReturned); 
pLocalPorts - (PORT JNFO_l*)malloc(dwSize); 

EnumPorts(NULL, 1. (unsigned char*)pLocal Ports, dwSize, &dwBytesNeeded, &dwReturned); 



while ((int)dwReturned > 

{ 

if (0 == stricmp(PoilNarne.c_str(), p Local Ports [i].pN am e)) 
break; 

} 

free(pLocal Ports); 



} 



=1 if (i >= (int)dwReturned || 0 >= dwReturned) 

0 { 

1 free( p Local M on i tors); 
y return false; 



f| free(pLocalMonitors); 
rQturn true; 




//We found the port, 
if ((int)dwReturned > i) 
return true; 

hLib = LoadLibrary("winspool.drv n ); 

if (NULL = hLib) 
return false; 

ADDPORTEX pfnAddPortEx = (ADDPORTEX)GetProcAddress(hLib, "AddPortExA"); 

Portlnfo.pMame = PortNamex_str(); 

if (pfnAddPortEx) 

{ 

if (!(*pfnAddPortEx)(NULL, 1, (unsigned char*)&Port!nfo, 
(WCHAR*)PortMonitorDescription.c_str())) 

{ 

FreeLibrary(hLib); 
return false; 



f FreeLibrary(hLib); 
return true; 



Ubool TPrinterControi::VaiidateDriver(AnsiString DriverName) 

y{ 

r DRIVER_INFO_3 *pRemoteDriver; 
F| DRIVER INFO 3 NewLocalDriverlnfo; 

TStringList *LocaIDrivers = new TStringList; 
& TStringList *DriverFiiesToCopy = new TStringList; 

2 TStringList *CopiedDriverFiles = new TStringList; 
il int i; 

3 int j; 

^ int nPos; 

~ int NullTerminatorsFound; 
* BYTE *pTemp; 

DWORD dwBufferSize - 1024; 

LocalDrivers = GetLocalDrivers(); 



while (LocalDrivers->Count > ++i) 
{ 

if (0 == stricmp(LocaIDrivers->Strings[i].c_str(), DriverName.c_str())) 
{ 

Local Dr i vers->Free() ; 
return true; 



pRemoteDriver = GetRemoteDriverInfo(SourceServerName, DriverName); 

if (NULL == pRemoteDriver) 
return faise; 




DriverFilesToCopy->Add(pRemoteDriver->pDriverPath); 
DriverFilesToCopy->Add(pRemoteDriver->pDataFile); 
DriverFilesToCopy->Add(pRemoteDriver->pConfigFile); 
DriverFilesToCopy->Add(pRemoteDriver->pHeIpFile); 

j = -I: 

NullTerminatorsFound = 0; 

pTemp - (BYTE*)maIloc(dwBufferSize); 

ZeroMemory(pTemp, dwBufferSize); 

while (+-H < (int)dwBufferSize && 2 > NullTerminatorsFound) 

{ 

if ( ? \0 f = pRemoteDriver->pDependentFiles[i]) 

{ 

DriverFiiesToCopy->Add((char iii )pTemp); 
ZeroMemory(pTemp, dwBufferSize); 

NuilTenninatorsFound++; 
continue; 

} 

pTemp[+4j] - pRemoteDriver->pDependentFiles[i]; 

s 

CopiedDriverFiles = CopyDriverFiles(DriverFiiesToCopy); 

NewLocalDriverlnfo.cVersion = pRemoteDriver->c Vers ion; 
NewLocalDriverlnfo.pName = pRemoteDriver->pName; 
NewLocalDriverlnfo.pEnvironment = pRemoteDriver->pEnvironment; 
NewLocalDriverlnfo.pMonitorlMame = pRemoteDriver->pMonitorName; 
NewLocalDriverInfo.pDefaultDataType = pRemoteDriver->pDefaultDataType; 

i = -l; 

NewLocalDriverlnfo.pDriverPath = CopiedDriverFiIes->Strings[++i].c_strO; 
NewLocaiDriverlnfo.pDataFile = CopiedDriverFiles->Stringsf++i]x_str(); 
NewLocalDriverInfo.pConfigFiIe = CopiedDriverFiIes->Strings[++i].c_str(); 
NewLocalDriverlnfo.pHelpFile = CopiedDriverFiles->Strings[++i].c_str(); 

NewLocalDriverInfo.pDependentFiles = (char*)malloc(dwBufferSize); 
ZeroMemory(NewLocalDriverfnfo.pDependentFiles, dwBufferSize); 
nPos = - I; 

while (CopiedDriverFiles->Count > ++i) 
{ 

j = 0; 

while(CopiedDriverFiIes->Strings[i].Length() >= ++j) 
NewLocaIDriverInfo.pDependentFi!es[++nPos] = Copied DriverFiles->Strings[i][j]; 

NewLocalDriverInfo.pDependentFiles[++nPos] = 'W; 

} 

NewLocalDriverInfo.pDependentFiies[++nPos] = '\0'; 
if (!AddPrinterDriver(NULL, 3, (unsigned char*)&NewLocalDriverInfo)) 
delete pRemoteDriver; 
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pRemoteDriver = NULL; 
Local Drivers->Free(); 
return false; 



delete pRemoteDriver; 
pRemoteDriver = NULL; 
Local Drivers->Free(); 



return true; 



bool TPrinterControl::PrinterSetOwnerOnlyRights(AnsiString PrinterName) 



HANDLE 

PRiNTERDEFAULTS 

LPPRINTER INFO 3 

PACCESS_ALLOWED_ACE 

PSID 

PACL 

DWORD 

BOOL 



hPrinter-NULL; 

pdPrinter; 

pPrinterlnfo -NULL; 



pTempAce; 
psidOwner; 
pPrinterNewACL; 



dwBytesNeeded; 
bOwnerDefaulted; 



// Assign desired access level to PRINTERDEAFULTS 
pdPrinter.DesiredAccess = PRINTERALLACCESS; 
pdPrinter.pDevMode = NULL; 
pdPrinter.pDatatype = NULL; 

//Open the printer and add the User 

if (0 != OpenPrinter(PrinterName.c__str(),&hPrinter,&pdPrinter)) 

{ 

//Get the required value of dwBytesNeeded. And allocate the memory for pPrinterlnfo. 

GetPrinter(hPrinter,3,(LPBYTE)pPrinterInfo,0,&dwBytesNeeded); 

pPrinterlnfo - (LPPRINTER INFO J)malloc(dwBytesNeeded); 

//Get the actual printer stuff and add the ACE to the DACL. 

if (0 != GetPrinter(hPrinter,3,(LPBYTE)pPrinterInfo,dwBytesNeeded,&dwBytesNeeded)) 



i f (GetSecur ity DescriptorOwner(pPr i nter I n fo- 
>pSecurityDescriptor,&psidOwner,&bOwnerDefaulted)) 
{ 

//Multiply by 2 to get the size needed for 2 ACEs. 

DWORD dwSize - sizeof(ACL) + 2*(sizeofl[ACCESS_ALLOWED_ACE) + 
GetLengthSid(psidOwner) - sizeof(DWORD)); 



pPrinterNewACL = (PACL)malloc(dwSize); 

Initial izeAcl(pPrinterNewACL, dwSize, ACLREVISION); 



pTempAce-(PACCESS_ALLOWED_ACE)malioc(sizeof(ACCESS__ALLOWED__ACE)); 



//For some reason, there are 2 ACEs for "Full Controi'\Add the ACEs. 
AddAccessAIlowedAce(pPrinterNewACL,ACL _REVISION,GENERIC_ALL,psidOwner); 
if (0 != GetAce(pPrinterNewACL,pPrinterNewACL->AceCount - 



1 ,(LPVOID*)&pTempAce)) 



pTempAce->Header.AceFlags - OBJECT JNHERIT ACE | 
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INHERIT_ONLY_ACE; 



AddAccessAllowedAce(pPrinterNewACL,ACL_REVISiON,PRINTER ALL ACCESS^psidOwner); 

if (0 1- GetAce(pPrinterNewACL,pPrinterNewACL->AceCount -,(LPVOID*)&pTempAce)) 
pTempAce->Header.AceFlags - CONTAINERJNHERITACE; 

InitializeSecurityDescriptor(pPrinterInfo->pSecurity Descriptor, 
SECURITY DESCRIPTOR REVISION); 

SetSecurityDescriptorDacl(pPrinterInfo->pSecurityDescriptor,TRUE, 
pPrinterNewACL,FALSE); 

SetPrinter(hPrinter,3,(LPBYTE)pPrinterInfo,0); 

} 



free(pPrinterlnfo); 

t 

else 
return false; 



//Close the printer. 
ClosePrinter(hPrinter); 

return true; 



3} 



Jbool TPrinterControi::PrinterSetCurrentUserOnIyRights(AnsiString PrinterName) 



HANDLE 

printerdefaults 
lpprinter inf0 3 
paccess_allowed ace 
;// psid 

z PSID psidCurrentUser; 
t PACL 
J DWORD 



hPrinter-NULL; 

pdPrinter; 

pPrinterlnfo = NULL; 
pTempAce; 
psidOwner; 



DWORD 

BOOL 

char 
char 
char 



PSID NAME USE 



dwSizeDomain = 256; 

szUserName[256]; 

szDomainControI!er[256]; 

szDomainName[256]; 



pPrinterNewACL; 

dwBytesNeeded = 0; 

bOwnerDefaulted; 



peUse; 



// Assign desired access level to PRINTERDEAFULTS 
pdPrinter.DesiredAccess - PRINTER_ALL ACCESS; 
pdPrinter.pDevMode = NULL; 
pdPrinter.pDatatype = NULL; 



//Open the printer and add the User 

if (0 != OpenPrinter(PrinterName.c_str(),&hPrinter,&pdPrinter)) 

{ 

//Get the required value of dwBytesNeeded. And allocate the memory for pPrinterlnfo. 

GetPrinter(hPrinter,3,(LPBYTE)pPrinterInfo,0,&dwBytesNeeded); 

pPrinterlnfo = (LPPRINTER INFOJ)malloc(dwBytesNeeded); 
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//Get the actual printer stuff and add the ACE to the DACL. 

if (0 != GetPrinter(hPrinter,3,(LPBYTE)pPrinterInfo,dwBytesNeeded,&dwBytesNeeded)) 

strcpy(szDomainController, getenv( M LOGONSERVER M )); 
strcpy(szUserName, getenv("USERNAME")); 
strcpy(szDomainName s getenv("USERDOMAIN n )); 

dwBytesNeeded = 0; 
dwSizeDomain = 256; 

LookupAccountName(szDomainController, szUserName, psidCurrentUser, 
&dwBytesNeeded, szDomainName, &dwSizeDomain, peUse); 

peUse - (PSID_NAME_USE)maIloc(sizeof(SID_NAME_USE)); 
psidCurrentUser = (PSID)malloc(dwBytesNeeded); 

if (LookupAccountName(szDomainControlier, szUserName, psidCurrentUser, 
&dwBytesNeeded, szDomainName, &dwSizeDomain, peUse)) 
{ 

//Multiply by 2 to get the size needed for 2 ACEs. 

DWORD dwSize - sizeof(ACL) + 2*(sizeof(ACCESS_ALLOWED_ACE) + 
GetLengthSid(psidCurrentUser) - sizeof(DWORD)); 

pPrinterNewACL - (PACL)inalloc(dwSize); 
InitiaIizeAcl(pPrinterNewACL 5 dwSize, ACL REVISION); 

pTempAce = (PACCESS_ALLOWED_ACE)malloc(sizeof(ACCESS_ALLOWED_ACE)); 
//For some reason, there are 2 ACEs for "Full Contror.Add the ACEs. 

AddAccessAllowedAce(pPrinterNewACL,ACL_REVIS10N,GENERIC_ALL,psidCurrentUser); 

if (0 != GetAce(pPrinterNewACL,pPrinterNewACL->AceCount - 

!,(LPVOID*)&pTempAce)) 

pTempAce->Header.AceFlags = OBJECT INHERIT ACE 1 

INHERIT ONLY ACE; 



AddAccessAllowedAce(pPrinterNewACL,ACL REVlSION ? PRINTER_ALL_ACCESS,psidCurrentUser); 

if (0 != GetAce(pPrinterNewACL,pPrinterNewACL->AceCount - 

l,(LPVOID*)&pTempAce)) 

pTempAce->Header.AceFlags - CONTAINER INHERIT ACE: 

InitializeSecurityDescriptor(pPrinterInfo->pSecurity Descriptor, 
SECURITY DESCRIPTOR REVISION); 

SetSecurityDescriptorDacI(pPrinterInfo->pSecurityDescriptor,TRUE, 
pPrinterNewACL,FALSE); 

SetPrinter(hPrinter,3,(LPBYTE)pPrinterInfo,0); 

s 

} 

free(pPrinterlnfo); 



return false; 

//Close the printer. 
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ClosePrinter(hPrinter); 



return true; 



booi TPrinterControi::PrinterAddAccessRights(AnsiString PrinterName, TStringList * Users, int nAccess) 



int i = -1 



while (Users->Count > ++i) 



PrinterAddAccessRights(PrinterName, Users->Strings[i], nAccess); 



return true; 



bool TPrinterControI::PrinterAddAccessRights(AnsiString PrinterName, AnsiString UserName, int nAccess) 

ACL_SIZEJNFORMATION ACLInformation; 

PRINTER DEFAULTS pdPrinter; 

LPPRINTERJNFOJ pPrinterlnfo = NULL; 

PACCESS ALLOWED ACE pTempAce; 

HANDLE hPrinter = NULL; 

PACL pPrinterACL; 

PACL pPrinterNewACL; 

DWORD dwBytesNeeded; 

BOOL bDaciPresent = FALSE; 

BOOL bDaclDefaulted = FALSE; 

int i; 

//Used for LookupAccountName(). 
PSID psidUserName; 
PSID_MAME_USE peUse; 
char szDomainName[256]; 
DWORD dwSizeDomain - 256; 

// Assign desired access level to PRINTER DEFAULTS 
pdPrinter.DesiredAccess = PRINTER ALL ACCESS; 
pdPrinter.pDevMode = NULL; 
pdPrinter.pDatatype = NULL; 



//Let's get the SID of the user. 
dwSizeDomain = 256; 
dwBytesNeeded = 0; 

LookupAccountName(NULL, UserNamex_str(), psidUserName, &dwBytesNeeded, 
szDomainName, &dwSizeDomain, peUse); 

peUse = (PSID NAME USE)malloc(sizeof(SID NAME USE)); 
psidUserName = (PSID)malloc(dwBytesNeeded); 

if (0 == LookupAccountName(NULL, UserName.c_str(), psidUserName, &dwBytesNeeded, szDomainName, 
&dwSizeDomain, peUse)) 




free(peUse); 
free(psidUserName); 

return false; 



//Open the printer and add the User 

if (0 != OpenPrinter(PrinterNamex_str(),&hPrinter,&pdPrinter)) 

{ 

//Get the required value of dwBytesNeeded. And allocate the memory for pPrinterlnfo. 

GetPrinter(hPrinter,3 J (LPBYTE)pPrinterInfo,0,&dwBytesNeeded); 

pPrinterlnfo - (LPPRINTERJNFO_3)malloc(dwBytesNeeded); 

//Get the actual printer stuff and add the ACE to the DACL. 

if (0 != GetPrinter(hPrinter,3,(LPBYTE)pPrinterInfo,dwBytesNeeded,&dwByteslMeeded)) 
{ 

// Get printer ACL 

GetSecurityDescriptorDaci(pPrinterInfo->pSecurityDescriptor,&bDaclPresent, 
&pPrinterACL,&bDaci Defaulted); 

// Get the number of entries in the ACL 

GetAcUnformation(pPrinterACL,&ACLInformation,sizeof(ACLInformation), 
AclSizelnformation); 



//Multiply by 2 to get the size needed for 2 ACEs. 

DWORD dwSize - pPrinterACL->AclSize + 2*(sizeof(ACCESS_ALLOWED ACE) + 
GetLengthSid(psidUserName) - sizeof(D WORD)); 

pPrinterNewACL - (PACL)malloc(dwSize); 
InitializeAcl(pPrinterNewACL, dwSize, ACLREVISION); 

//Copy the old ACL's ACEs to the new ACL. 

pTempAoe = (PACCESS_ALLOWED_ACE)malloc(sizeofl[ACCESS_ALLOWED_ACE)); 

while (pPrinterACL->AceCount > ++i) 
{ 

if (0 != GetAce(pPrinterACL, i,(LPVOID*)&pTempAce)) 

AddAce(pPrinterNewACL, ACL REVISION, MAXDWORD, pTempAce, 
pTempAce->Header.AceSize); 

} 

switch(nAccess) 
{ 

case(CONTROL_FULL): 

//For some reason, there are 2 ACEs for "Full Control n .Add the ACEs. 

AddAccessAliowedAce(pPrinterNewACL,ACL_REVISION 5 GENERIC_ALL,psidUserName); 

if (0 != GetAce(pPrinterNewACL,pPrinterNewACL->AceCount - 

1 ? (LPVOI D*)&pTemp Ace)) 

pTempAce->Header.AceFlags = OBJECT INHERIT ACE [ 

INHERIT ONLY__ACE; 



AddAccessAllowedAce(pPrinterNewACL,ACL_REVISION,PRINTER ALL ACCESS,psidUserName); 

if (0 != GetAce(pPrinterNewACL,pPrinterNewACL->AceCount - 
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L(LPVOfD*)&pTempAce)) 

pTempAce->Header.AceFlags = CONTAINER JNHERIT_ACE; 

break; 

default: 

break; 

} 

I n it i al izeSecu rity Descr iptor(pPr i nterl n fo- 
>pSecurityDescriptor,SECURITY_DESCRIPTOR_REVISION); 

SetSecurityDescriptorDacl(pPrinterInfo->pSecurityDescriptor,TRUE,pPrinterNewACL,FALSE); 

SetPrinter(hPrinter,3,(LPBYTE)pPrinterInfo,0); 

} 

free(pPrinterlnfo); 

free(peUse); 
} 

else 

return false; 

//Close the printer. 
ClosePrinter(hPrinter); 

3 return true: 

n} 

jbool TPrinterControI::RemapPort(AnsiString Port, AnsiString Monitor) 

2 if (Port.IsEmptyO || Monitor. IsEmptyO) 

Messages->Add( M Unable to remap Port!"); 
return false; 

3 } 

Z NewPortName = Port; 

!: NewPortMonitor = Monitor; 

~ return true; 

TStringList *TPrinterContro1::GetConfigFileList() 

{ 

TStringList *ConfigFiles = new TStringList; 
TStringList * Filenames = new TStringList; 
int i; 

EnumerateFi!es(PrtInfoPath, Filenames, false, NULL); 

while (F11enames->Count > ++i) 

( 

\ 

Filenames->Strings[i] = JustFiIenameL(Filenames->Strings[i]); 
//Check for dots. 

if (0 == Fiienames->Strings[i].AnsiCompareIC( ,f . M ) || 
0 == FiIenames->Strings[i].AnsiCompareIC( n .. ,f )) 
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{ 

continue; 

i 
i 

Filenames->Strings[i] = Filenames->Strings[i].SubString( 
I, (Filenames->Strings[i].Length() - 4)); 

if (0 > ConfigFi]es->IndexOf(Fiienames->Strings[i]) && 
!Filenames->Strings[i].IsEmpty()) 

{ 

ConfigFiles->Add(Filenames->Strings[i]); 

} 

FiIenames->Free(); 
return ConfigFiles; 

TStringList *TPrinterControl::LoadPrinterInfoFromFile(AnsiString PrinterName) 

{ 

TStringList * Printerlnfo = new TStringList; 

AnsiString Returned PrinterMame; 
3 AnsiString ReturnedPortName; 
3 AnsiString Returned PortMonitorName; 

: I if (!ReadPrinterInfo(PrtInfoPath + "W + PrinterName + ".Pit")) 

u I 

Messages->Add("Error reading Printerlnfo from file!"); 

n > 

ReturnedPrinterName = SelectedPrinterInfo->pPrinterName; 
^ ReturnedPortName - Selected Printer In fo->pPortN am e; 

^ ReturnedPortMonitorName = GetPortIVIonitor(SeIectedPrinterInfo->pPortName); 

if Printerinfo->Add(ReturnedPrinterName); 

f PrinterInfo->Add(ReturnedPortName); 

^ PrinterInfo->Add(RetumedPortMonitorName); 

return Printerlnfo; 

j 

bool TPrinterControl::PrinterPropertiesDialog( AnsiString PrinterName, HANDLE hWnd) 

HANDLE h Printer; 
DWORD dwNeeded, dwReturned; 
PRINTERJNF02* pPrtlnfo; 
PR1NTERDEFAULTS pdPrinter; 

// Assign desired access level to PRINTERDEAFULTS 
pdPrinter.DesiredAccess = PRINTERALLACCESS; 

pdPrinter.pDevMode = NULL; 
pdPrinter.pDatatype = NULL; 

//Open handle to printer. 

if(!OpenPrinter(PrinterNamex_str() ? &hPrinter, &pdPrinter)) 
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{ 

Messages->Add("OpenPrinter() Failed!"); 
return false; 

} 

//Select the default printer. 
if(NULL!=hPrinter){ 

// Get the buffer size needed 
GetPrinter(hPrinter,2,NULL,0,&dwNeeded); 

pPrtInfo=(PRINTER_INFO_2*)malIoc(dwNeeded); 
ZeroMemory(pPrtInfo, dwNeeded); 

//get the printer info 

GetPrinter(hPrinter,2 9 (unsigned char*)pPrt!nfo,dwNeeded,&dwReturned); 

if (!PrinterProperties(hWnd, hPrinter)) 
i 

Messages->Add("PrinterProperties() Failed!"); 

ClosePrinter(hPrinter); 
free(pPrtlnfo); 
return faise; 

3 } 

fl //Close the handle to the printer. 

1 ClosePrinter(h Printer); 

y } 

« free(pPrtfnfo); 
return true; 

J 

-bool TPrinterControl::DeieteLocalPrinter(AnsiString PrinterName) 

ft 

* HANDLE hPrinter; 

J PRINTER DEFAULTS pdPrinter; 

// Assign desired access level to PR1NTERDEAFULTS 
pdPrinter.DesiredAccess - PRIN TERA LLACCESS; 
pdPrinter.pDevMode = NULL; 
pdPrinter.pDatatype = NULL; 

//Open handle to printer. 

if(!OpenPrinter(PrinterNamex_str(), fthPrinter, fepdPrinter)) 

{ 

Messages->Add( M DeletePrinter() Failed!"); 
return false; 

} 

//Select the default printer. 
if(NULL == hPrinter) 

{ 

Messages->Add("DeletePrinter() Failed! NULL Handle."); 
return false; 

} 
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SetPr i nter(h Printer, 0,NULL, PRINTERCONTROLPURGE); 

Sleep(250); 

DeletePrinter(hPrinter); 

//Close the handle to the printer. 
C 1 ose Pr i n ter(h Pr i n ter) ; 

return true; 



bool TPrinterControl::DeletePrinterConfig(AnsiString PrinterConfigName) 

AnsiString PrinterConfigPath; 
bool bReturn = true; 



PrinterConfigPath = PrtlnfoPath + "W" + PrinterConfigName; 

if (FiIeExists(PrinterConfigPath + ".Pit") && 
FileExists(PrinterConfigPath + ".Dev")) 

{ 

if (!DeleteFile(PrinterConfigPath + ".Prt") || 
!DeleteFiie(PrinterConflgPath + ".Dev")) 

{ 

bReturn = false; 

} 

} 

else 

{ 

Messages->Add("Files Not Found: " + PrinterConfigPath); 
bReturn = false; 

} 

return bReturn; 



-AnsiString TPrinterControl::GetPrinterShareName( AnsiString PrinterName) 

HANDLE hPrinter; 
DWORD dwNeeded, dwReturned; 
PRINTERINF02* pPrtlnfo; 
PRINTERDEFAULTS pdPrinter; 
AnsiString ShareName; 
AnsiString ServerName; 
AnsiString Full ShareName; 

// Assign desired access level to PRINTER DEAFULTS 
pdPrinter.DesiredAccess - PRINTER ACCESS USE; 
pdPrinter.pDevMode = NULL; 
pdPrinter.pDatatype = NULL; 

//Open handle to printer 

if(!OpenPrinter(PrinterName.c str(), &hPrinter, &pdPrinter)) 

{ 

Messages->Add("OpenPrinter() Failed!"); 
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return ""; 

//Select the default printer. 
if(NULL!-hPrinter){ 

// Get the buffer size needed 
GetPrinter(hPrinter,2,NULL,0,&dwNeeded); 

pPrtInfo=(PRINTERJMFO_2*)maIloc(dwNeeded); 
ZeroMemory(pPrtlnfo 5 dwNeeded); 

//get the printer info 

GetPrinter(hPrinter,2,(unsigned char*)pPrtInfo,dwNeeded,&dwReturned); 

ShareName - pPrtInfo->pShareName; 
ServerName = pPrtInfo->pServerName; 

//Close the handle to the printer. 
CiosePrinter(hPrinter); 

} 

free(pPrtlnfo); 

1 if (ServerName. IsEmptyO) 

n FullShareName = ShareName; 

i else 

FullShareName = ServerName + "\\" + ShareName; 
~ return FullShareName; 



«AnsiString TPrinterControl::GetPrinterFullName(AnsiString PrinterName) 

■3{ 

HANDLE hPrinter; 
DWORD dwNeeded, dwReturned; 
PRINTER INFG_2* pPrtlnfo; 
PRINTER_DEFAULTS pdPrinter; 
AnsiString FullName; 

// Assign desired access level to PRINTER DEAFULTS 
pdPrinter.DesiredAccess - PRINTER ACCESSJJSE; 
pdPrinter.pDevMode = NULL; 
pdPrinter.pDatatype = NULL; 

//Open handle to printer. 

if(!OpenPrinter(PrinterNamex_str(), &hPrinter, &pdPrinter)) 

{ 

Messages->Add("OpenPrinter() Failed!"); 
return ""; 

} 

//Select the default printer. 
iT(NULLNhFrinter){ 
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// Get the buffer size needed 
GetPrinter(hPrinter,2,NULL,0,&dwNeeded); 



pPrtInfo-(PRINTER_INFO_2*)mal]oc(dwNeeded); 
ZeroMemory(pPrtInfo, dwNeeded); 



//get the printer info 

GetPrinter(hPrinter,2,(unsigned char*)pPrtInfo,dwNeeded,&dwReturned); 



FullName 



pPrtlnfo~>pPrinterName; 



//Close the handle to the printer. 
CiosePrinter(hPrinter); 



free(pPrtlnfo); 



return FullName; 



bool TPrinterControi::ClearNetworkPrinters() 

{ 

3 DWORD dwBytesNeeded; 

3 DWORD dwPrtRet; 

[1 LPPRINTERINF04 pPrtlnfb; 

3 int i=0; 

U //Get the memory needed for structure. 

S EnumPnnters(PRiNTER_ENUM_CONNECTIONS,NULL,4 5 NULL,0,&dwBytesNeeded ; &dwPrtRet); 

//Allocate the memory for the structure. 
A pPrtInfo-(LPPRINTER_INFO_4)malloc(dwBytesNeeded); 

f t //Enumerate the printers. 

y {f 

~ J (!EnumPrinters(PRINTER_ENUMj:ON &dwPrtR 

^ return false; 

//Delete the printer connection, 
for (i - 0; i < (int)dwPrtRet; 

DeletePrinterConnection((pPrtlnfo++)->pPrinterName); 

return true; 



bool TPrinterControl::SetIcaPrinterRights() 

{ 

TStringList * Local PrinterList = new TStringList; 

PRINTERINF02 * Installed Printer Info - new PRINTER_INFO_2; 

DWORD InstaliedPrinterlnfoReturned; 

DWORD dwSize; 

DWORD dwNeeded; 

AnsiString Comment; 

AnsiString PrinterName; 




int i; 

EnumPrinters(PRlNTER_ENUM_LOCAL, NULL, 2,(BYTE*)]nstalledPrinterInfo, 
0, &dwSize, &InstalledPrinterInfoReturned); 

InstalledPrinterlnfo = (PRINTER JNFO_2*)malloc(dwSize); 
ZeroMemory(InstalIedPrinterInfo, dwSize); 

if (!EnumPrinters(PRITMTER_ENUM_LOCAL, NULL, 2,(BYTE*)InstalledPrinterInfo, 
dwSize, &dwNeeded, &lnstaIledPrinterInfoReturned)) 

{ 

return faise; 

} 

while ((int)InstaliedPrinterlnfoReturned > ++i) 
{ 

PrinterName = InstalledPrinterinfo[i].pPrinterName; 
Comment = InstalledPrinterInfo[i].pComment; 

if (0 < Comment.AnsiPos("Auto Created Client Printer")) 

r 
i 

PrinterSetOwnerOnlyRights(PrinterName); 

PrinterAddAccessRights(PrinterName 5 "SYSTEM", CONTROLFULL); 

\ 
) 

;i free(InstalledPrinterlnfo); 
: i return true; 

y} 

^bool TPrinterControl::CopyConfiguration(AnsiString Source, AnsiString Destination) 

AnsiString PrinterConfigSourcePath; 
~ AnsiString PrinterConflgDestPath; 

PrinterConfigSourcePath - PrtJnfoPath + "W + Source; 
3 PrinterConflgDestPath = PrtlnfoPath + "\\» -f Destination; 

3 if (FileExists(PrinterConflgSourcePath + ".Prt") && 
FiieExists(PrinterConfigSourcePath + ".Dev")) 

{ 

if (0 == ::CopyFile(String(PrinterConflgSourcePath + ?, .Prt").c_str(), 
String(PrinterConfigDestPath + ".Prt").c_str(), NULL)) 

{ 

return false; 

} 

if (0 = ::CopyFile(String(PrinterConfigSourcePath + ".Dev").c_str(), 
String(PrinterConfigDestPath + ".Dev f, ).c_str(), NULL)) 

{ 

DeIeteFile(PrinterConflgDestPath + ".Prt"); 
return false; 

} 

} 

else 
{ 

Messages->Add(TiIes Not Found: " + PrinterConfigSourcePath); 
return false; 
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s 



return true; 

} 

bool TPrinterControl::SaveLocalDriver(AnsiString DriverName) 
{ 

AnsiString PrinterName; 
HANDLE hPrinter; 

PrinterName = "PMPAdmin#" + DriverName; 
SelectedPrinterInfo->pPrinterName = PrinterName.c_str(); 
SeiectedPrinterInfo->pPortName - "LPTI :"; 
SeiectedPrinterinfo->pDriverName = DriverName.c_str(); 
SelectedPrintednfo->pPrintProcessor = "winprint"; 

//Add the printer 

hPrinter - AddPrinter(NULL, 2, (unsigned char*)SelectedPrinterInfo); 

if (NULL == hPrinter) 
return false; 

ClosePrinter(hPrinter); 
i hPrinter -NULL; 

n if (!SaveLocalPrinter(PrinterName, DriverName)) 

3 { 

"l DeleteLocalPrinter(PrinterName); 
\ return false; 

s? i 

f 

s DeieteLocalPrinter(PrinterName); 
return true; 



■MnsiString TPrinterControl::CleanupFilename(AnsiString Filename) 

3 int Index; 
int i; 

TStringList *InvalidList = new TStringList; 

if (Filename.IsEmptyO) 
return Filename; 

InvalidList->Add( n Y\"); 
InvalidList->Add(7"); 
InvalidList->Add(":"); 
InvalidList->Add("? ,f ); 
Inva1idList->Add("* n ); 

i = -I; 

while (InvalidList->Count > 

{ 

index = Filename.AnsiPos(InvalidList->Strings[i]); 

if (0 < Index) 

{ 
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Filename.Delete(Index ? 1); 

Filename = CleanupFilename(Filename); 

} 

} 

return Filename; 

} 

AnsiString TPrinterControI::GetIcaClientPort(AnsiString OidPort) 

< 

int BackSlash - 0; 
AnsiString NewPort; 
AnsiString Port; 

BackSlash = OldPortAnsiPosfW"); 

Port = OldPort.SubString( (BackSlash + 1), 
(01dPort.Length() - BackSlash) ); 

NewPort - "ClientW" + String(getenv(TLIENTNAME")) + M #\\" + Port; 



return NewPort; 

SPRINTER JNFO_2 *TPrinterControl::GetPrinterInfo2(AnsiString PrinterName) 

l{ 

j HANDLE hPrinter; 

Ti DWORD dwNeeded, dwReturned; 

« PRINTER_INFO_2* pPrtlnfb; 

J PRINTER DEFAULTS pdPrinter; 

// Assign desired access level to PRINTERDEAFULTS 
* pdPrinter.DesiredAccess = PRINTER_ACCESS__USE; 

f s pdPrinter.pDevMode = NULL; 

f pdPrinter.pDatatype = NULL; 

J //Open handle to printer. 

3 if(!OpenPrinter(PrinterNamex_strO, &hPrinter, &pdPrinter)) 

{ 

return NULL; 

} 

//Select the default printer. 
if(NULL!=hPrinter){ 

// Get the buffer size needed 
GetPrinter(hPrinter ; 2,NULL,0,&dwNeeded); 

pPrt!nfo=(PRINTERJNFO_2*)malioc(dwNeeded); 
ZeroMemory(pPrtInfo, dwNeeded); 

//get the printer info 

GetPrinter(hPrinter,2,(unsigned char*)pPrt!nfo,dwNeeded,&dwReturned); 

//Close the handle to the printer. 
ClosePrinter(h Printer); 
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} 

return pPrtlnfo; 

} 

AnsiString TPrinterControl::GetStatusString(DWORD dwStatus) 

{ 

AnsiString Status; 

switch(dwStatus) 
{ 

case(PRINTER_STATUS_BUSY): 
Status - "Busy"; 
break; 

case(PRINTER_STATUS__DOOR OPEN): 
Status - "Door Open"; 
break; 

case(PRINTER STATUS ERROR): 
Status = "Error"; 
break; 

case(PRINTER_STATUS INITIALIZING): 
Status = "Initializing"; 
break; 

case(PRINTER_STATUS_IO_ACTIVE): 
Status -"I/O Active"; 
break; 

case(PRINTER_STATUS_MANUAL_FEED): 
Status - "Manual Feed"; 
break; 

case(PRINTER_STATUS_NO_TONER): 
Status = "No Toner"; 
break; 

case(PRINTER STATUS_NOT_AVAILABLE): 
Status -"Not Available"; 
break; 

case(PRINTER__STATUS__OFFLINE): 
Status = "Offline"; 
break; 

case(PRINTER STATUS_OUT_OF MEMORY): 
Status = "Out of Memory"; 
break; 

case(PRINTER_STATUS OUTPUT BIN FULL): 
Status - "Output Bin Full"; 
break; 

case(PRINTER_STATUS_PAGE_PUNT): 
Status - "Page Punt"; 
break; 

case(PRINTER STATUS PAPER JAM): 
Status = "Paper Jam"; 
break; 

case(PRINTER_STATUS__PAPER_OUT): 
Status- "Paper Out"; 
break; 

case(PRINTER_STATUS_PAPER_PROBLEM): 

Status = "Paper Problem"; 
break; 

case(PR!NTER_STATUS_PAUSED): 
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Status = "Paused"; 
break; 

case(PR!NTER STATUS__PENDING DELETION): 
Status "Pending Deletion"; 
break; 

case(PRINTERSTATUSPOWERSAVE): 
Status = "Power Save"; 
break; 

case(PRINTERSTATUSPRlNTING): 
Status = "Printing"; 
break; 

case(PRINTER STATUS PROCESSING): 
Status = "Processing"; 
break; 

case(PRINTER_STATUS_SERVER JJN KNOWN): 
Status = "Server Unknown"; 
break; 

case(PRINTER_STATUS_TONER_LOW): 

Status = "Toner Low"; 
break; 

case(PRINTER STATUS USERJNTERVENTION): 
Status = "User Intervention"; 
break; 

C3 case(PRINTER_STATUS WAITING): 
%2 Status - "Waiting"; 

|fl break; 

J case(PRINTER_STATUS_WARMING_UP): 
y Status -"Warming Up"; 

fy break; 
^ default: 
I f| Status = "Ready"; 

break; 

L } 

If* return Status; 
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